Linux Cubed Series 3: Developer Tools/Linux Cubed Series 3 - Developer Tools.iso/devel/lang/fortran/toolpack.000/toolpack/toolpack1.2/tools/istlx/SCNBLK.MAC.f

Text File | 1989-03-04 | 90.0 KB | 2,220 lines

C---------------------------------------------------------
C    TOOLPACK/1    Release: 2.4
C---------------------------------------------------------
      BLOCK DATA LSTGBD
C
C  CUSTOMISABLE BLOCK DATA
C
C  MCONTC - MAXIMUM NUMBER OF CONTINUATION LINES ALLOWED TO
C           A STATEMENT. CONTINUATION LINES ARE NOT DELETED,
C           THIS ONLY CONTROLS WHEN THE ERROR MESSAGE IS
C           PRINTED. THE STANDARD SAYS THAT THIS VALUE IS 19.
C  CMTLEN - THE LENGTH AT WHICH COMMENTS WILL BE TRUNCATED,
C           USUALY SET TO 80, BUT CAN BE SET TO 72 TO REMOVE
C           SEQUENCE NUMBERS FROM COMMENTS.
C
      COMMON /CNTCRD/ NCONTC, MCONTC
      INTEGER NCONTC, MCONTC
      COMMON /CNTROL/ CMTLEN
      INTEGER CMTLEN
      SAVE

      DATA MCONTC /19/
      DATA CMTLEN /80/

      END
C----------------------------------------------------------------
      BLOCK DATA SCANBD
C
      COMMON /AKTYPS/ KSTEP,DSTEP,CALL,FECALL,VECALL,ELSE,OUTKTK,
     +                OUTDTK,SCREEN,EVAL,END,ERR,KADV,DADV,FCKADV,
     +                FCDADV,VCKADV,VCDADV,ELKSTP,ELDSTP,KTSCRN,DTSCRN,
     +                KTEVAL, DTEVAL
      INTEGER         KSTEP,DSTEP,CALL,FECALL,VECALL,ELSE,OUTKTK,
     +                OUTDTK,SCREEN,EVAL,END,ERR,KADV,DADV,FCKADV,
     +                FCDADV,VCKADV,VCDADV,ELKSTP,ELDSTP,KTSCRN,DTSCRN,
     +                KTEVAL,DTEVAL
      COMMON /CHRBFC/ ICHAR, CBFSIZ, CBFEND, MCHAR, CHRBUF
      INTEGER         ICHAR, CBFSIZ, CBFEND, MCHAR, CHRBUF(1603)
      COMMON /CHICOM/ ERRCHI, EOLCHI, EOICHI, EOFCHI
      INTEGER         ERRCHI, EOLCHI, EOICHI, EOFCHI
      COMMON /CURSTC/ ACT, CHAR, ERRORF, FBKUPC, NEWACT, ENDSCR
      INTEGER         ACT, CHAR, FBKUPC, NEWACT
      LOGICAL         ERRORF, ENDSCR
      COMMON /KSTAKC/ IKSTAC, MKSTAC, KSTACK, FTOKEN, TOKEN, KEEPF
      INTEGER         IKSTAC, MKSTAC, KSTACK(2500), FTOKEN, TOKEN
      LOGICAL         KEEPF
      COMMON /CSTAKC/ ICSTAC, MCSTAC, CSTACK
      INTEGER         ICSTAC, MCSTAC, CSTACK(100)
      COMMON /TCMAXC/ MTKNCH
      INTEGER         MTKNCH
      COMMON /NESTCM/ NSTELS
      INTEGER         NSTELS
      COMMON /BFFRCM/ MBUFFR, BUFFER
      INTEGER         MBUFFR, BUFFER(82)
      COMMON /TKNUMC/ TOKNUM, STMNUM, PUNUM, PUNAME
      INTEGER         TOKNUM, STMNUM, PUNUM, PUNAME(134)
      COMMON /INSTCM/ INSTAT
      INTEGER         INSTAT
      SAVE
C
      DATA KSTEP/1/, DSTEP/2/, CALL/3/, FECALL/4/, VECALL/5/,
     $     ELSE/6/, OUTKTK/7/, OUTDTK/8/, SCREEN/9/, EVAL/10/,
     $     END/11/, ERR/12/, KADV/13/, DADV/14/, FCKADV/15/,
     $     FCDADV/16/, VCKADV/17/, VCDADV/18/, ELKSTP/19/,
     $     ELDSTP/20/, KTSCRN/21/, DTSCRN/22/, KTEVAL/23/,
     $     DTEVAL/24/
C MCHAR MUST BE LARGE ENOUGH FOR THE ENDING EOI, A FLOATING EOI, AND
C ALL INPUT (INCLUDING ADDED EOL CHARACTERS).
      DATA MCHAR /1603/
      DATA ERRCHI /1/
      DATA ACT /1/, ERRORF /.FALSE./, ENDSCR /.FALSE./
      DATA IKSTAC /1/, MKSTAC /2500/, KSTACK(1) /0/, FTOKEN /1/,
     $     TOKEN /1 /, KEEPF/ .FALSE. /
      DATA ICSTAC /1/, MCSTAC /100/, CSTACK(1) /0/
      DATA NSTELS /0/
      DATA MTKNCH /1326/
      DATA MBUFFR /80/
      DATA TOKNUM /0/
      DATA STMNUM /0/
      DATA INSTAT /-1/
C
      END
C ----------------------------------------------------------------------
      BLOCK DATA STBLBD
      COMMON /EXPTCM/ EXPONT( 3)
      COMMON /BTVRCM/ BTVCTR( 5,  72)
      INTEGER BTVCTR
      COMMON /AKSCM1/ A(2050)
      COMMON /AKSCM2/ B(2050)
      INTEGER EXPONT,A,B
      SAVE
      DATA EXPONT/5,0,0/
      DATA (BTVCTR(I,1),I=1,5)/0,67108864,0,0,0/
      DATA (BTVCTR(I,2),I=1,5)/0,536887280,0,0,0/
      DATA (BTVCTR(I,3),I=1,5)/2147483647,2147483647,2147483647,
     +2147483647,2139095040/
      DATA (BTVCTR(I,4),I=1,5)/0,536879104,0,0,0/
      DATA (BTVCTR(I,5),I=1,5)/0,536870912,0,0,0/
      DATA (BTVCTR(I,6),I=1,5)/0,67108864,266941984,133470992,0/
      DATA (BTVCTR(I,7),I=1,5)/0,100663296,268435452,134217726,0/
      DATA (BTVCTR(I,8),I=1,5)/0,0,0,0,33554432/
      DATA (BTVCTR(I,9),I=1,5)/0,67108864,0,0,33554432/
      DATA (BTVCTR(I,10),I=1,5)/0,16368,0,0,0/
      DATA (BTVCTR(I,11),I=1,5)/2147483647,2147483647,2147483647,
     +2147483647,2122317824/
      DATA (BTVCTR(I,12),I=1,5)/0,0,67108864,33554432,0/
      DATA (BTVCTR(I,13),I=1,5)/0,0,33554432,16777216,0/
      DATA (BTVCTR(I,14),I=1,5)/0,0,16777216,8388608,0/
      DATA (BTVCTR(I,15),I=1,5)/0,0,8388608,4194304,0/
      DATA (BTVCTR(I,16),I=1,5)/0,0,4194304,2097152,0/
      DATA (BTVCTR(I,17),I=1,5)/0,0,524288,262144,0/
      DATA (BTVCTR(I,18),I=1,5)/0,0,4096,2048,0/
      DATA (BTVCTR(I,19),I=1,5)/0,0,512,256,0/
      DATA (BTVCTR(I,20),I=1,5)/0,0,2097152,1048576,0/
      DATA (BTVCTR(I,21),I=1,5)/0,0,1024,512,0/
      DATA (BTVCTR(I,22),I=1,5)/0,0,65536,32768,0/
      DATA (BTVCTR(I,23),I=1,5)/0,0,8192,4096,0/
      DATA (BTVCTR(I,24),I=1,5)/0,0,32,16,0/
      DATA (BTVCTR(I,25),I=1,5)/0,0,134217728,67108864,0/
      DATA (BTVCTR(I,26),I=1,5)/0,0,128,64,0/
      DATA (BTVCTR(I,27),I=1,5)/0,0,256,128,0/
      DATA (BTVCTR(I,28),I=1,5)/0,0,16384,8192,0/
      DATA (BTVCTR(I,29),I=1,5)/0,0,32768,16384,0/
      DATA (BTVCTR(I,30),I=1,5)/0,0,16,8,0/
      DATA (BTVCTR(I,31),I=1,5)/0,0,2048,1024,0/
      DATA (BTVCTR(I,32),I=1,5)/0,0,1048576,524288,0/
      DATA (BTVCTR(I,33),I=1,5)/0,0,64,32,0/
      DATA (BTVCTR(I,34),I=1,5)/0,69206016,0,0,0/
      DATA (BTVCTR(I,35),I=1,5)/0,67125232,0,0,0/
      DATA (BTVCTR(I,36),I=1,5)/0,2097152,0,0,0/
      DATA (BTVCTR(I,37),I=1,5)/0,0,131072,65536,0/
      DATA (BTVCTR(I,38),I=1,5)/0,67108864,256,128,0/
      DATA (BTVCTR(I,39),I=1,5)/0,0,8,4,0/
      DATA (BTVCTR(I,40),I=1,5)/0,100794368,268435452,134217726,0/
      DATA (BTVCTR(I,41),I=1,5)/0,1,0,0,0/
      DATA (BTVCTR(I,42),I=1,5)/0,33554432,268435452,134217726,0/
      DATA (BTVCTR(I,43),I=1,5)/0,524288,0,0,0/
      DATA (BTVCTR(I,44),I=1,5)/0,67108864,4194304,2097152,0/
      DATA (BTVCTR(I,45),I=1,5)/0,131072,0,0,0/
      DATA (BTVCTR(I,46),I=1,5)/0,16368,0,268435456,0/
      DATA (BTVCTR(I,47),I=1,5)/0,0,0,0,0/
      DATA (BTVCTR(I,48),I=1,5)/0,2113520,0,0,0/
      DATA (BTVCTR(I,49),I=1,5)/0,67108865,0,0,0/
      DATA (BTVCTR(I,50),I=1,5)/0,67108864,50922496,25461248,0/
      DATA (BTVCTR(I,51),I=1,5)/0,107872240,268435452,134217726,0/
      DATA (BTVCTR(I,52),I=1,5)/0,67239936,0,0,0/
      DATA (BTVCTR(I,53),I=1,5)/0,69730304,0,0,0/
      DATA (BTVCTR(I,54),I=1,5)/0,69206017,0,0,0/
      DATA (BTVCTR(I,55),I=1,5)/0,38666224,268435452,134217726,0/
      DATA (BTVCTR(I,56),I=1,5)/0,8,0,0,0/
      DATA (BTVCTR(I,57),I=1,5)/0,1048576,0,0,0/
      DATA (BTVCTR(I,58),I=1,5)/0,109051897,268435452,134217726,0/
      DATA (BTVCTR(I,59),I=1,5)/0,108003321,268435452,134217726,0/
      DATA (BTVCTR(I,60),I=1,5)/0,7831544,233374464,116687232,0/
      DATA (BTVCTR(I,61),I=1,5)/0,6635504,233374464,116687232,0/
      DATA (BTVCTR(I,62),I=1,5)/0,16384,0,0,0/
      DATA (BTVCTR(I,63),I=1,5)/0,262144,0,0,0/
      DATA (BTVCTR(I,64),I=1,5)/0,65536,0,0,0/
      DATA (BTVCTR(I,65),I=1,5)/0,32768,0,0,0/
      DATA (BTVCTR(I,66),I=1,5)/0,4194304,0,0,0/
      DATA (BTVCTR(I,67),I=1,5)/2147483647,2143289343,2147483647,
     +2147483647,2080374784/
      DATA (BTVCTR(I,68),I=1,5)/0,327680,0,0,0/
      DATA (BTVCTR(I,69),I=1,5)/0,0,268435452,134217726,0/
      DATA (BTVCTR(I,70),I=1,5)/0,33554432,0,0,0/
      DATA (BTVCTR(I,71),I=1,5)/0,0,4,2,0/
      DATA (BTVCTR(I,72),I=1,5)/2147483647,2147483647,2147483647,
     +2147483647,2080374784/
      DATA A(1),B(1)/33558528,6/
      DATA A(2),B(2)/251666432,4100/
      DATA A(3),B(3)/184561664,1/
      DATA A(4),B(4)/151007260,8/
      DATA A(5),B(5)/201338880,4/
      DATA A(6),B(6)/134230016,327690/
      DATA A(7),B(7)/201338880,6/
      DATA A(8),B(8)/33570816,13/
      DATA A(9),B(9)/201338880,8/
      DATA A(10),B(10)/33558528,6/
      DATA A(11),B(11)/251666432,4100/
      DATA A(12),B(12)/201338880,10/
      DATA A(13),B(13)/234901504,13/
      DATA A(14),B(14)/100687908,61458/
      DATA A(15),B(15)/100693266,65554/
      DATA A(16),B(16)/50356260,18/
      DATA A(17),B(17)/201338880,13/
      DATA A(18),B(18)/50345281,20/
      DATA A(19),B(19)/201338880,18/
      DATA A(20),B(20)/33558528,25/
      DATA A(21),B(21)/33587200,23/
      DATA A(22),B(22)/201338880,20/
      DATA A(23),B(23)/134230016,323585/
      DATA A(24),B(24)/201338880,23/
      DATA A(25),B(25)/234901504,25/
      DATA A(26),B(26)/134254592,327700/
      DATA A(27),B(27)/201338880,25/
      DATA A(28),B(28)/234901504,28/
      DATA A(29),B(29)/16818176,31/
      DATA A(30),B(30)/184561664,28/
      DATA A(31),B(31)/234901504,31/
      DATA A(32),B(32)/218144768,31/
      DATA A(33),B(33)/117485568,286755/
      DATA A(34),B(34)/201338880,31/
      DATA A(35),B(35)/184561664,35/
      DATA A(36),B(36)/33558528,109/
      DATA A(37),B(37)/33603584,105/
      DATA A(38),B(38)/33607680,99/
      DATA A(39),B(39)/33611776,94/
      DATA A(40),B(40)/33615872,88/
      DATA A(41),B(41)/33619968,84/
      DATA A(42),B(42)/33624064,79/
      DATA A(43),B(43)/33628160,75/
      DATA A(44),B(44)/33632256,70/
      DATA A(45),B(45)/33636352,67/
      DATA A(46),B(46)/33640448,64/
      DATA A(47),B(47)/33644544,61/
      DATA A(48),B(48)/33648640,58/
      DATA A(49),B(49)/33652736,55/
      DATA A(50),B(50)/33656832,52/
      DATA A(51),B(51)/201338880,36/
      DATA A(52),B(52)/234901504,52/
      DATA A(53),B(53)/33632256,112/
      DATA A(54),B(54)/201338880,52/
      DATA A(55),B(55)/234901504,55/
      DATA A(56),B(56)/33640448,115/
      DATA A(57),B(57)/201338880,55/
      DATA A(58),B(58)/234901504,58/
      DATA A(59),B(59)/33628160,118/
      DATA A(60),B(60)/201338880,58/
      DATA A(61),B(61)/234901504,61/
      DATA A(62),B(62)/33648640,121/
      DATA A(63),B(63)/201338880,61/
      DATA A(64),B(64)/234901504,64/
      DATA A(65),B(65)/33615872,124/
      DATA A(66),B(66)/201338880,64/
      DATA A(67),B(67)/234901504,67/
      DATA A(68),B(68)/33648640,129/
      DATA A(69),B(69)/201338880,67/
      DATA A(70),B(70)/234901504,70/
      DATA A(71),B(71)/33660928,138/
      DATA A(72),B(72)/33665024,135/
      DATA A(73),B(73)/33656832,132/
      DATA A(74),B(74)/201338880,70/
      DATA A(75),B(75)/234901504,75/
      DATA A(76),B(76)/33640448,145/
      DATA A(77),B(77)/33656832,141/
      DATA A(78),B(78)/201338880,75/
      DATA A(79),B(79)/234901504,79/
      DATA A(80),B(80)/33669120,155/
      DATA A(81),B(81)/33673216,152/
      DATA A(82),B(82)/33619968,149/
      DATA A(83),B(83)/201338880,79/
      DATA A(84),B(84)/234901504,84/
      DATA A(85),B(85)/33660928,162/
      DATA A(86),B(86)/33648640,159/
      DATA A(87),B(87)/201338880,84/
      DATA A(88),B(88)/234901504,88/
      DATA A(89),B(89)/33677312,175/
      DATA A(90),B(90)/33681408,172/
      DATA A(91),B(91)/33669120,168/
      DATA A(92),B(92)/33644544,165/
      DATA A(93),B(93)/201338880,88/
      DATA A(94),B(94)/234901504,94/
      DATA A(95),B(95)/33648640,184/
      DATA A(96),B(96)/33624064,181/
      DATA A(97),B(97)/33656832,178/
      DATA A(98),B(98)/201338880,94/
      DATA A(99),B(99)/234901504,99/
      DATA A(100),B(100)/33648640,197/
      DATA A(101),B(101)/33644544,194/
      DATA A(102),B(102)/33685504,191/
      DATA A(103),B(103)/33656832,188/
      DATA A(104),B(104)/201338880,99/
      DATA A(105),B(105)/234901504,105/
      DATA A(106),B(106)/33644544,204/
      DATA A(107),B(107)/33656832,201/
      DATA A(108),B(108)/201338880,105/
      DATA A(109),B(109)/234901504,109/
      DATA A(110),B(110)/134242304,327887/
      DATA A(111),B(111)/201338880,109/
      DATA A(112),B(112)/234901504,112/
      DATA A(113),B(113)/33632256,223/
      DATA A(114),B(114)/201338880,112/
      DATA A(115),B(115)/234901504,115/
      DATA A(116),B(116)/33624064,226/
      DATA A(117),B(117)/201338880,115/
      DATA A(118),B(118)/234901504,118/
      DATA A(119),B(119)/33615872,229/
      DATA A(120),B(120)/201338880,118/
      DATA A(121),B(121)/234901504,121/
      DATA A(122),B(122)/33636352,232/
      DATA A(123),B(123)/201338880,121/
      DATA A(124),B(124)/234901504,124/
      DATA A(125),B(125)/33652736,242/
      DATA A(126),B(126)/33665024,239/
      DATA A(127),B(127)/33656832,235/
      DATA A(128),B(128)/201338880,124/
      DATA A(129),B(129)/234901504,129/
      DATA A(130),B(130)/33665024,245/
      DATA A(131),B(131)/201338880,129/
      DATA A(132),B(132)/234901504,132/
      DATA A(133),B(133)/33689600,248/
      DATA A(134),B(134)/201338880,132/
      DATA A(135),B(135)/234901504,135/
      DATA A(136),B(136)/33648640,251/
      DATA A(137),B(137)/201338880,135/
      DATA A(138),B(138)/234901504,138/
      DATA A(139),B(139)/33603584,254/
      DATA A(140),B(140)/201338880,138/
      DATA A(141),B(141)/234901504,141/
      DATA A(142),B(142)/33660928,260/
      DATA A(143),B(143)/33640448,257/
      DATA A(144),B(144)/201338880,141/
      DATA A(145),B(145)/234901504,145/
      DATA A(146),B(146)/33648640,266/
      DATA A(147),B(147)/33624064,263/
      DATA A(148),B(148)/201338880,145/
      DATA A(149),B(149)/234901504,149/
      DATA A(150),B(150)/134356992,94477/
      DATA A(151),B(151)/201338880,149/
      DATA A(152),B(152)/234901504,152/
      DATA A(153),B(153)/33628160,272/
      DATA A(154),B(154)/201338880,152/
      DATA A(155),B(155)/234901504,155/
      DATA A(156),B(156)/33665024,278/
      DATA A(157),B(157)/33681408,275/
      DATA A(158),B(158)/201338880,155/
      DATA A(159),B(159)/234901504,159/
      DATA A(160),B(160)/33640448,282/
      DATA A(161),B(161)/201338880,159/
      DATA A(162),B(162)/234901504,162/
      DATA A(163),B(163)/33669120,285/
      DATA A(164),B(164)/201338880,162/
      DATA A(165),B(165)/234901504,165/
      DATA A(166),B(166)/33632256,288/
      DATA A(167),B(167)/201338880,165/
      DATA A(168),B(168)/234901504,168/
      DATA A(169),B(169)/33665024,296/
      DATA A(170),B(170)/33611776,291/
      DATA A(171),B(171)/201338880,168/
      DATA A(172),B(172)/234901504,172/
      DATA A(173),B(173)/33660928,299/
      DATA A(174),B(174)/201338880,172/
      DATA A(175),B(175)/234901504,175/
      DATA A(176),B(176)/33665024,302/
      DATA A(177),B(177)/201338880,175/
      DATA A(178),B(178)/234901504,178/
      DATA A(179),B(179)/33665024,305/
      DATA A(180),B(180)/201338880,178/
      DATA A(181),B(181)/234901504,181/
      DATA A(182),B(182)/33673216,308/
      DATA A(183),B(183)/201338880,181/
      DATA A(184),B(184)/234901504,184/
      DATA A(185),B(185)/33660928,314/
      DATA A(186),B(186)/134361088,41271/
      DATA A(187),B(187)/201338880,184/
      DATA A(188),B(188)/234901504,188/
      DATA A(189),B(189)/33644544,317/
      DATA A(190),B(190)/201338880,188/
      DATA A(191),B(191)/234901504,191/
      DATA A(192),B(192)/33656832,320/
      DATA A(193),B(193)/201338880,191/
      DATA A(194),B(194)/234901504,194/
      DATA A(195),B(195)/33648640,323/
      DATA A(196),B(196)/201338880,194/
      DATA A(197),B(197)/234901504,197/
      DATA A(198),B(198)/33669120,330/
      DATA A(199),B(199)/33673216,326/
      DATA A(200),B(200)/201338880,197/
      DATA A(201),B(201)/234901504,201/
      DATA A(202),B(202)/33607680,333/
      DATA A(203),B(203)/201338880,201/
      DATA A(204),B(204)/234901504,204/
      DATA A(205),B(205)/33648640,336/
      DATA A(206),B(206)/201338880,204/
      DATA A(207),B(207)/33558528,109/
      DATA A(208),B(208)/33624064,79/
      DATA A(209),B(209)/33619968,84/
      DATA A(210),B(210)/33615872,88/
      DATA A(211),B(211)/33611776,94/
      DATA A(212),B(212)/33656832,52/
      DATA A(213),B(213)/33603584,105/
      DATA A(214),B(214)/33607680,99/
      DATA A(215),B(215)/33648640,58/
      DATA A(216),B(216)/33640448,64/
      DATA A(217),B(217)/33652736,55/
      DATA A(218),B(218)/33636352,67/
      DATA A(219),B(219)/33628160,75/
      DATA A(220),B(220)/33632256,70/
      DATA A(221),B(221)/33644544,61/
      DATA A(222),B(222)/201338880,207/
      DATA A(223),B(223)/234901504,223/
      DATA A(224),B(224)/33624064,339/
      DATA A(225),B(225)/201338880,223/
      DATA A(226),B(226)/234901504,226/
      DATA A(227),B(227)/33665024,342/
      DATA A(228),B(228)/201338880,226/
      DATA A(229),B(229)/234901504,229/
      DATA A(230),B(230)/33669120,345/
      DATA A(231),B(231)/201338880,229/
      DATA A(232),B(232)/234901504,232/
      DATA A(233),B(233)/33624064,348/
      DATA A(234),B(234)/201338880,232/
      DATA A(235),B(235)/234901504,235/
      DATA A(236),B(236)/33644544,354/
      DATA A(237),B(237)/33611776,351/
      DATA A(238),B(238)/201338880,235/
      DATA A(239),B(239)/234901504,239/
      DATA A(240),B(240)/33660928,357/
      DATA A(241),B(241)/201338880,239/
      DATA A(242),B(242)/234901504,242/
      DATA A(243),B(243)/33624064,360/
      DATA A(244),B(244)/201338880,242/
      DATA A(245),B(245)/234901504,245/
      DATA A(246),B(246)/33648640,363/
      DATA A(247),B(247)/201338880,245/
      DATA A(248),B(248)/234901504,248/
      DATA A(249),B(249)/33615872,366/
      DATA A(250),B(250)/201338880,248/
      DATA A(251),B(251)/234901504,251/
      DATA A(252),B(252)/33628160,369/
      DATA A(253),B(253)/201338880,251/
      DATA A(254),B(254)/234901504,254/
      DATA A(255),B(255)/33640448,372/
      DATA A(256),B(256)/201338880,254/
      DATA A(257),B(257)/234901504,257/
      DATA A(258),B(258)/33656832,375/
      DATA A(259),B(259)/201338880,257/
      DATA A(260),B(260)/234901504,260/
      DATA A(261),B(261)/33632256,378/
      DATA A(262),B(262)/201338880,260/
      DATA A(263),B(263)/234901504,263/
      DATA A(264),B(264)/33669120,381/
      DATA A(265),B(265)/201338880,263/
      DATA A(266),B(266)/234901504,266/
      DATA A(267),B(267)/33636352,384/
      DATA A(268),B(268)/201338880,266/
      DATA A(269),B(269)/33558528,391/
      DATA A(270),B(270)/50480483,387/
      DATA A(271),B(271)/201338880,269/
      DATA A(272),B(272)/234901504,272/
      DATA A(273),B(273)/33644544,394/
      DATA A(274),B(274)/201338880,272/
      DATA A(275),B(275)/234901504,275/
      DATA A(276),B(276)/33660928,397/
      DATA A(277),B(277)/201338880,275/
      DATA A(278),B(278)/234901504,278/
      DATA A(279),B(279)/33640448,403/
      DATA A(280),B(280)/33615872,400/
      DATA A(281),B(281)/201338880,278/
      DATA A(282),B(282)/234901504,282/
      DATA A(283),B(283)/33673216,406/
      DATA A(284),B(284)/201338880,282/
      DATA A(285),B(285)/234901504,285/
      DATA A(286),B(286)/33607680,409/
      DATA A(287),B(287)/201338880,285/
      DATA A(288),B(288)/234901504,288/
      DATA A(289),B(289)/33615872,412/
      DATA A(290),B(290)/201338880,288/
      DATA A(291),B(291)/234901504,291/
      DATA A(292),B(292)/33624064,422/
      DATA A(293),B(293)/33619968,419/
      DATA A(294),B(294)/134254592,57760/
      DATA A(295),B(295)/201338880,291/
      DATA A(296),B(296)/234901504,296/
      DATA A(297),B(297)/33640448,425/
      DATA A(298),B(298)/201338880,296/
      DATA A(299),B(299)/234901504,299/
      DATA A(300),B(300)/33624064,428/
      DATA A(301),B(301)/201338880,299/
      DATA A(302),B(302)/234901504,302/
      DATA A(303),B(303)/33615872,431/
      DATA A(304),B(304)/201338880,302/
      DATA A(305),B(305)/234901504,305/
      DATA A(306),B(306)/33656832,434/
      DATA A(307),B(307)/201338880,305/
      DATA A(308),B(308)/234901504,308/
      DATA A(309),B(309)/33615872,437/
      DATA A(310),B(310)/201338880,308/
      DATA A(311),B(311)/33558528,444/
      DATA A(312),B(312)/16818176,440/
      DATA A(313),B(313)/201338880,311/
      DATA A(314),B(314)/234901504,314/
      DATA A(315),B(315)/33603584,447/
      DATA A(316),B(316)/201338880,314/
      DATA A(317),B(317)/234901504,317/
      DATA A(318),B(318)/33644544,450/
      DATA A(319),B(319)/201338880,317/
      DATA A(320),B(320)/234901504,320/
      DATA A(321),B(321)/33640448,453/
      DATA A(322),B(322)/201338880,320/
      DATA A(323),B(323)/234901504,323/
      DATA A(324),B(324)/33632256,456/
      DATA A(325),B(325)/201338880,323/
      DATA A(326),B(326)/234901504,326/
      DATA A(327),B(327)/33628160,462/
      DATA A(328),B(328)/33673216,459/
      DATA A(329),B(329)/201338880,326/
      DATA A(330),B(330)/234901504,330/
      DATA A(331),B(331)/33665024,465/
      DATA A(332),B(332)/201338880,330/
      DATA A(333),B(333)/234901504,333/
      DATA A(334),B(334)/33705984,468/
      DATA A(335),B(335)/201338880,333/
      DATA A(336),B(336)/234901504,336/
      DATA A(337),B(337)/33607680,471/
      DATA A(338),B(338)/201338880,336/
      DATA A(339),B(339)/234901504,339/
      DATA A(340),B(340)/33636352,474/
      DATA A(341),B(341)/201338880,339/
      DATA A(342),B(342)/234901504,342/
      DATA A(343),B(343)/33615872,477/
      DATA A(344),B(344)/201338880,342/
      DATA A(345),B(345)/234901504,345/
      DATA A(346),B(346)/134262784,111072/
      DATA A(347),B(347)/201338880,345/
      DATA A(348),B(348)/234901504,348/
      DATA A(349),B(349)/33607680,486/
      DATA A(350),B(350)/201338880,348/
      DATA A(351),B(351)/234901504,351/
      DATA A(352),B(352)/134262784,131552/
      DATA A(353),B(353)/201338880,351/
      DATA A(354),B(354)/234901504,354/
      DATA A(355),B(355)/134262784,172521/
      DATA A(356),B(356)/201338880,354/
      DATA A(357),B(357)/234901504,357/
      DATA A(358),B(358)/33640448,493/
      DATA A(359),B(359)/201338880,357/
      DATA A(360),B(360)/234901504,360/
      DATA A(361),B(361)/33669120,496/
      DATA A(362),B(362)/201338880,360/
      DATA A(363),B(363)/234901504,363/
      DATA A(364),B(364)/134262784,90611/
      DATA A(365),B(365)/201338880,363/
      DATA A(366),B(366)/234901504,366/
      DATA A(367),B(367)/134262784,143859/
      DATA A(368),B(368)/201338880,366/
      DATA A(369),B(369)/234901504,369/
      DATA A(370),B(370)/134262784,147955/
      DATA A(371),B(371)/201338880,369/
      DATA A(372),B(372)/234901504,372/
      DATA A(373),B(373)/33648640,505/
      DATA A(374),B(374)/201338880,372/
      DATA A(375),B(375)/234901504,375/
      DATA A(376),B(376)/33673216,508/
      DATA A(377),B(377)/201338880,375/
      DATA A(378),B(378)/234901504,378/
      DATA A(379),B(379)/33615872,511/
      DATA A(380),B(380)/201338880,378/
      DATA A(381),B(381)/234901504,381/
      DATA A(382),B(382)/33665024,514/
      DATA A(383),B(383)/201338880,381/
      DATA A(384),B(384)/234901504,384/
      DATA A(385),B(385)/33640448,517/
      DATA A(386),B(386)/201338880,384/
      DATA A(387),B(387)/100820358,1589768/
      DATA A(388),B(388)/100687908,1593864/
      DATA A(389),B(389)/50376739,520/
      DATA A(390),B(390)/201338880,387/
      DATA A(391),B(391)/234901504,391/
      DATA A(392),B(392)/134356992,327949/
      DATA A(393),B(393)/201338880,391/
      DATA A(394),B(394)/234901504,394/
      DATA A(395),B(395)/33624064,524/
      DATA A(396),B(396)/201338880,394/
      DATA A(397),B(397)/234901504,397/
      DATA A(398),B(398)/33624064,527/
      DATA A(399),B(399)/201338880,397/
      DATA A(400),B(400)/234901504,400/
      DATA A(401),B(401)/33636352,530/
      DATA A(402),B(402)/201338880,400/
      DATA A(403),B(403)/234901504,403/
      DATA A(404),B(404)/33624064,533/
      DATA A(405),B(405)/201338880,403/
      DATA A(406),B(406)/234901504,406/
      DATA A(407),B(407)/33656832,536/
      DATA A(408),B(408)/201338880,406/
      DATA A(409),B(409)/234901504,409/
      DATA A(410),B(410)/33665024,539/
      DATA A(411),B(411)/201338880,409/
      DATA A(412),B(412)/234901504,412/
      DATA A(413),B(413)/33624064,542/
      DATA A(414),B(414)/134254592,49568/
      DATA A(415),B(415)/201338880,412/
      DATA A(416),B(416)/33558528,545/
      DATA A(417),B(417)/268468224,8227/
      DATA A(418),B(418)/201338880,416/
      DATA A(419),B(419)/234901504,419/
      DATA A(420),B(420)/33624064,548/
      DATA A(421),B(421)/201338880,419/
      DATA A(422),B(422)/234901504,422/
      DATA A(423),B(423)/33619968,551/
      DATA A(424),B(424)/201338880,422/
      DATA A(425),B(425)/234901504,425/
      DATA A(426),B(426)/33714176,554/
      DATA A(427),B(427)/201338880,425/
      DATA A(428),B(428)/234901504,428/
      DATA A(429),B(429)/33689600,557/
      DATA A(430),B(430)/201338880,428/
      DATA A(431),B(431)/234901504,431/
      DATA A(432),B(432)/33640448,560/
      DATA A(433),B(433)/201338880,431/
      DATA A(434),B(434)/234901504,434/
      DATA A(435),B(435)/134262784,37363/
      DATA A(436),B(436)/201338880,434/
      DATA A(437),B(437)/234901504,437/
      DATA A(438),B(438)/33669120,563/
      DATA A(439),B(439)/201338880,437/
      DATA A(440),B(440)/234901504,440/
      DATA A(441),B(441)/218144768,440/
      DATA A(442),B(442)/117604352,287286/
      DATA A(443),B(443)/201338880,440/
      DATA A(444),B(444)/234901504,444/
      DATA A(445),B(445)/134361088,327991/
      DATA A(446),B(446)/201338880,444/
      DATA A(447),B(447)/234901504,447/
      DATA A(448),B(448)/33644544,570/
      DATA A(449),B(449)/201338880,447/
      DATA A(450),B(450)/234901504,450/
      DATA A(451),B(451)/134262784,20979/
      DATA A(452),B(452)/201338880,450/
      DATA A(453),B(453)/234901504,453/
      DATA A(454),B(454)/33656832,573/
      DATA A(455),B(455)/201338880,453/
      DATA A(456),B(456)/234901504,456/
      DATA A(457),B(457)/33615872,576/
      DATA A(458),B(458)/201338880,456/
      DATA A(459),B(459)/234901504,459/
      DATA A(460),B(460)/33648640,579/
      DATA A(461),B(461)/201338880,459/
      DATA A(462),B(462)/234901504,462/
      DATA A(463),B(463)/33644544,582/
      DATA A(464),B(464)/201338880,462/
      DATA A(465),B(465)/234901504,465/
      DATA A(466),B(466)/33624064,585/
      DATA A(467),B(467)/201338880,465/
      DATA A(468),B(468)/234901504,468/
      DATA A(469),B(469)/33632256,588/
      DATA A(470),B(470)/201338880,468/
      DATA A(471),B(471)/234901504,471/
      DATA A(472),B(472)/33705984,591/
      DATA A(473),B(473)/201338880,471/
      DATA A(474),B(474)/234901504,474/
      DATA A(475),B(475)/33669120,594/
      DATA A(476),B(476)/201338880,474/
      DATA A(477),B(477)/234901504,477/
      DATA A(478),B(478)/134262784,164320/
      DATA A(479),B(479)/201338880,477/
      DATA A(480),B(480)/33558528,612/
      DATA A(481),B(481)/33722368,610/
      DATA A(482),B(482)/50480524,606/
      DATA A(483),B(483)/16949248,601/
      DATA A(484),B(484)/16818176,597/
      DATA A(485),B(485)/184561664,480/
      DATA A(486),B(486)/234901504,486/
      DATA A(487),B(487)/33656832,615/
      DATA A(488),B(488)/201338880,486/
      DATA A(489),B(489)/33730560,618/
      DATA A(490),B(490)/100844972,2011635/
      DATA A(491),B(491)/50376739,499/
      DATA A(492),B(492)/201338880,489/
      DATA A(493),B(493)/234901504,493/
      DATA A(494),B(494)/33669120,621/
      DATA A(495),B(495)/201338880,493/
      DATA A(496),B(496)/234901504,496/
      DATA A(497),B(497)/33611776,624/
      DATA A(498),B(498)/201338880,496/
      DATA A(499),B(499)/33558528,640/
      DATA A(500),B(500)/33722368,610/
      DATA A(501),B(501)/50480483,636/
      DATA A(502),B(502)/16949248,631/
      DATA A(503),B(503)/16818176,627/
      DATA A(504),B(504)/184561664,499/
      DATA A(505),B(505)/234901504,505/
      DATA A(506),B(506)/33660928,643/
      DATA A(507),B(507)/201338880,505/
      DATA A(508),B(508)/234901504,508/
      DATA A(509),B(509)/33615872,646/
      DATA A(510),B(510)/201338880,508/
      DATA A(511),B(511)/234901504,511/
      DATA A(512),B(512)/134262784,119283/
      DATA A(513),B(513)/201338880,511/
      DATA A(514),B(514)/234901504,514/
      DATA A(515),B(515)/134262784,123379/
      DATA A(516),B(516)/201338880,514/
      DATA A(517),B(517)/234901504,517/
      DATA A(518),B(518)/33656832,649/
      DATA A(519),B(519)/201338880,517/
      DATA A(520),B(520)/33558528,654/
      DATA A(521),B(521)/33722368,610/
      DATA A(522),B(522)/50480483,652/
      DATA A(523),B(523)/184561664,520/
      DATA A(524),B(524)/234901504,524/
      DATA A(525),B(525)/33607680,657/
      DATA A(526),B(526)/201338880,524/
      DATA A(527),B(527)/234901504,527/
      DATA A(528),B(528)/33640448,660/
      DATA A(529),B(529)/201338880,527/
      DATA A(530),B(530)/234901504,530/
      DATA A(531),B(531)/33615872,663/
      DATA A(532),B(532)/201338880,530/
      DATA A(533),B(533)/234901504,533/
      DATA A(534),B(534)/33669120,666/
      DATA A(535),B(535)/201338880,533/
      DATA A(536),B(536)/234901504,536/
      DATA A(537),B(537)/33665024,669/
      DATA A(538),B(538)/201338880,536/
      DATA A(539),B(539)/234901504,539/
      DATA A(540),B(540)/33624064,672/
      DATA A(541),B(541)/201338880,539/
      DATA A(542),B(542)/234901504,542/
      DATA A(543),B(543)/33619968,675/
      DATA A(544),B(544)/201338880,542/
      DATA A(545),B(545)/234901504,545/
      DATA A(546),B(546)/134254592,328096/
      DATA A(547),B(547)/201338880,545/
      DATA A(548),B(548)/234901504,548/
      DATA A(549),B(549)/33644544,678/
      DATA A(550),B(550)/201338880,548/
      DATA A(551),B(551)/234901504,551/
      DATA A(552),B(552)/134254592,65952/
      DATA A(553),B(553)/201338880,551/
      DATA A(554),B(554)/234901504,554/
      DATA A(555),B(555)/134262784,70131/
      DATA A(556),B(556)/201338880,554/
      DATA A(557),B(557)/234901504,557/
      DATA A(558),B(558)/33656832,681/
      DATA A(559),B(559)/201338880,557/
      DATA A(560),B(560)/234901504,560/
      DATA A(561),B(561)/33669120,684/
      DATA A(562),B(562)/201338880,560/
      DATA A(563),B(563)/234901504,563/
      DATA A(564),B(564)/33632256,687/
      DATA A(565),B(565)/201338880,563/
      DATA A(566),B(566)/33558528,698/
      DATA A(567),B(567)/16949248,693/
      DATA A(568),B(568)/33738752,690/
      DATA A(569),B(569)/201338880,566/
      DATA A(570),B(570)/234901504,570/
      DATA A(571),B(571)/33615872,701/
      DATA A(572),B(572)/201338880,570/
      DATA A(573),B(573)/234901504,573/
      DATA A(574),B(574)/33607680,705/
      DATA A(575),B(575)/201338880,573/
      DATA A(576),B(576)/234901504,576/
      DATA A(577),B(577)/134262784,25056/
      DATA A(578),B(578)/201338880,576/
      DATA A(579),B(579)/234901504,579/
      DATA A(580),B(580)/33669120,708/
      DATA A(581),B(581)/201338880,579/
      DATA A(582),B(582)/234901504,582/
      DATA A(583),B(583)/33615872,711/
      DATA A(584),B(584)/201338880,582/
      DATA A(585),B(585)/234901504,585/
      DATA A(586),B(586)/33669120,714/
      DATA A(587),B(587)/201338880,585/
      DATA A(588),B(588)/234901504,588/
      DATA A(589),B(589)/33628160,717/
      DATA A(590),B(590)/201338880,588/
      DATA A(591),B(591)/234901504,591/
      DATA A(592),B(592)/33611776,720/
      DATA A(593),B(593)/201338880,591/
      DATA A(594),B(594)/234901504,594/
      DATA A(595),B(595)/134361088,8915/
      DATA A(596),B(596)/201338880,594/
      DATA A(597),B(597)/234901504,597/
      DATA A(598),B(598)/218144768,597/
      DATA A(599),B(599)/117485568,287446/
      DATA A(600),B(600)/201338880,597/
      DATA A(601),B(601)/234901504,601/
      DATA A(602),B(602)/218275840,601/
      DATA A(603),B(603)/16965632,735/
      DATA A(604),B(604)/117485568,312027/
      DATA A(605),B(605)/201338880,601/
      DATA A(606),B(606)/33558528,743/
      DATA A(607),B(607)/33722368,610/
      DATA A(608),B(608)/50480483,740/
      DATA A(609),B(609)/184561664,606/
      DATA A(610),B(610)/33746944,35/
      DATA A(611),B(611)/201338880,610/
      DATA A(612),B(612)/234901504,612/
      DATA A(613),B(613)/134262784,328426/
      DATA A(614),B(614)/201338880,612/
      DATA A(615),B(615)/234901504,615/
      DATA A(616),B(616)/33644544,752/
      DATA A(617),B(617)/201338880,615/
      DATA A(618),B(618)/234901504,618/
      DATA A(619),B(619)/134414336,262899/
      DATA A(620),B(620)/201338880,618/
      DATA A(621),B(621)/234901504,621/
      DATA A(622),B(622)/134262784,135667/
      DATA A(623),B(623)/201338880,621/
      DATA A(624),B(624)/234901504,624/
      DATA A(625),B(625)/134262784,139744/
      DATA A(626),B(626)/201338880,624/
      DATA A(627),B(627)/234901504,627/
      DATA A(628),B(628)/218144768,627/
      DATA A(629),B(629)/117485568,287477/
      DATA A(630),B(630)/201338880,627/
      DATA A(631),B(631)/234901504,631/
      DATA A(632),B(632)/218275840,631/
      DATA A(633),B(633)/16965632,766/
      DATA A(634),B(634)/117485568,312058/
      DATA A(635),B(635)/201338880,631/
      DATA A(636),B(636)/33558528,774/
      DATA A(637),B(637)/33722368,610/
      DATA A(638),B(638)/50480483,771/
      DATA A(639),B(639)/184561664,636/
      DATA A(640),B(640)/234901504,640/
      DATA A(641),B(641)/134262784,328457/
      DATA A(642),B(642)/201338880,640/
      DATA A(643),B(643)/234901504,643/
      DATA A(644),B(644)/33665024,783/
      DATA A(645),B(645)/201338880,643/
      DATA A(646),B(646)/234901504,646/
      DATA A(647),B(647)/33665024,786/
      DATA A(648),B(648)/201338880,646/
      DATA A(649),B(649)/234901504,649/
      DATA A(650),B(650)/33673216,789/
      DATA A(651),B(651)/201338880,649/
      DATA A(652),B(652)/33722368,610/
      DATA A(653),B(653)/184561664,652/
      DATA A(654),B(654)/234901504,654/
      DATA A(655),B(655)/134262784,328200/
      DATA A(656),B(656)/201338880,654/
      DATA A(657),B(657)/234901504,657/
      DATA A(658),B(658)/33624064,792/
      DATA A(659),B(659)/201338880,657/
      DATA A(660),B(660)/234901504,660/
      DATA A(661),B(661)/33615872,795/
      DATA A(662),B(662)/201338880,660/
      DATA A(663),B(663)/234901504,663/
      DATA A(664),B(664)/33640448,798/
      DATA A(665),B(665)/201338880,663/
      DATA A(666),B(666)/234901504,666/
      DATA A(667),B(667)/33632256,801/
      DATA A(668),B(668)/201338880,666/
      DATA A(669),B(669)/234901504,669/
      DATA A(670),B(670)/134356992,86820/
      DATA A(671),B(671)/201338880,669/
      DATA A(672),B(672)/234901504,672/
      DATA A(673),B(673)/33648640,807/
      DATA A(674),B(674)/201338880,672/
      DATA A(675),B(675)/234901504,675/
      DATA A(676),B(676)/134356992,54058/
      DATA A(677),B(677)/201338880,675/
      DATA A(678),B(678)/234901504,678/
      DATA A(679),B(679)/33615872,813/
      DATA A(680),B(680)/201338880,678/
      DATA A(681),B(681)/234901504,681/
      DATA A(682),B(682)/33644544,816/
      DATA A(683),B(683)/201338880,681/
      DATA A(684),B(684)/234901504,684/
      DATA A(685),B(685)/33656832,819/
      DATA A(686),B(686)/201338880,684/
      DATA A(687),B(687)/234901504,687/
      DATA A(688),B(688)/33624064,822/
      DATA A(689),B(689)/201338880,687/
      DATA A(690),B(690)/234901504,690/
      DATA A(691),B(691)/134246400,197433/
      DATA A(692),B(692)/201338880,690/
      DATA A(693),B(693)/234901504,693/
      DATA A(694),B(694)/218275840,693/
      DATA A(695),B(695)/16965632,831/
      DATA A(696),B(696)/117641216,312124/
      DATA A(697),B(697)/201338880,693/
      DATA A(698),B(698)/234901504,698/
      DATA A(699),B(699)/134381568,328516/
      DATA A(700),B(700)/201338880,698/
      DATA A(701),B(701)/234901504,701/
      DATA A(702),B(702)/33628160,843/
      DATA A(703),B(703)/33607680,840/
      DATA A(704),B(704)/201338880,701/
      DATA A(705),B(705)/234901504,705/
      DATA A(706),B(706)/33665024,846/
      DATA A(707),B(707)/201338880,705/
      DATA A(708),B(708)/234901504,708/
      DATA A(709),B(709)/134262784,29171/
      DATA A(710),B(710)/201338880,708/
      DATA A(711),B(711)/234901504,711/
      DATA A(712),B(712)/33677312,849/
      DATA A(713),B(713)/201338880,711/
      DATA A(714),B(714)/234901504,714/
      DATA A(715),B(715)/33660928,852/
      DATA A(716),B(716)/201338880,714/
      DATA A(717),B(717)/234901504,717/
      DATA A(718),B(718)/33656832,855/
      DATA A(719),B(719)/201338880,717/
      DATA A(720),B(720)/234901504,720/
      DATA A(721),B(721)/33656832,858/
      DATA A(722),B(722)/201338880,720/
      DATA A(723),B(723)/33558528,865/
      DATA A(724),B(724)/16818176,861/
      DATA A(725),B(725)/201338880,723/
      DATA A(726),B(726)/33558528,868/
      DATA A(727),B(727)/33722368,610/
      DATA A(728),B(728)/50480524,606/
      DATA A(729),B(729)/16949248,601/
      DATA A(730),B(730)/184561664,726/
      DATA A(731),B(731)/33558528,871/
      DATA A(732),B(732)/33722368,610/
      DATA A(733),B(733)/50480524,606/
      DATA A(734),B(734)/184561664,731/
      DATA A(735),B(735)/234901504,735/
      DATA A(736),B(736)/16949248,601/
      DATA A(737),B(737)/218292224,735/
      DATA A(738),B(738)/117485568,312027/
      DATA A(739),B(739)/201338880,735/
      DATA A(740),B(740)/33558528,874/
      DATA A(741),B(741)/33722368,610/
      DATA A(742),B(742)/184561664,740/
      DATA A(743),B(743)/234901504,743/
      DATA A(744),B(744)/134262784,328557/
      DATA A(745),B(745)/201338880,743/
      DATA A(746),B(746)/33558528,612/
      DATA A(747),B(747)/33722368,610/
      DATA A(748),B(748)/50480524,606/
      DATA A(749),B(749)/16949248,601/
      DATA A(750),B(750)/16818176,597/
      DATA A(751),B(751)/184561664,746/
      DATA A(752),B(752)/234901504,752/
      DATA A(753),B(753)/134262784,184809/
      DATA A(754),B(754)/201338880,752/
      DATA A(755),B(755)/50345397,881/
      DATA A(756),B(756)/201338880,755/
      DATA A(757),B(757)/33558528,885/
      DATA A(758),B(758)/33722368,610/
      DATA A(759),B(759)/50480483,636/
      DATA A(760),B(760)/16949248,631/
      DATA A(761),B(761)/184561664,757/
      DATA A(762),B(762)/33558528,888/
      DATA A(763),B(763)/33722368,610/
      DATA A(764),B(764)/50480483,636/
      DATA A(765),B(765)/184561664,762/
      DATA A(766),B(766)/234901504,766/
      DATA A(767),B(767)/16949248,631/
      DATA A(768),B(768)/218292224,766/
      DATA A(769),B(769)/117485568,312058/
      DATA A(770),B(770)/201338880,766/
      DATA A(771),B(771)/33558528,891/
      DATA A(772),B(772)/33722368,610/
      DATA A(773),B(773)/184561664,771/
      DATA A(774),B(774)/234901504,774/
      DATA A(775),B(775)/134262784,328574/
      DATA A(776),B(776)/201338880,774/
      DATA A(777),B(777)/33558528,640/
      DATA A(778),B(778)/33722368,610/
      DATA A(779),B(779)/50480483,636/
      DATA A(780),B(780)/16949248,631/
      DATA A(781),B(781)/16818176,627/
      DATA A(782),B(782)/184561664,777/
      DATA A(783),B(783)/234901504,783/
      DATA A(784),B(784)/33624064,898/
      DATA A(785),B(785)/201338880,783/
      DATA A(786),B(786)/234901504,786/
      DATA A(787),B(787)/33615872,901/
      DATA A(788),B(788)/201338880,786/
      DATA A(789),B(789)/234901504,789/
      DATA A(790),B(790)/134262784,127011/
      DATA A(791),B(791)/201338880,789/
      DATA A(792),B(792)/234901504,792/
      DATA A(793),B(793)/33665024,904/
      DATA A(794),B(794)/201338880,792/
      DATA A(795),B(795)/234901504,795/
      DATA A(796),B(796)/134262784,102880/
      DATA A(797),B(797)/201338880,795/
      DATA A(798),B(798)/234901504,798/
      DATA A(799),B(799)/134262784,168425/
      DATA A(800),B(800)/201338880,798/
      DATA A(801),B(801)/234901504,801/
      DATA A(802),B(802)/33624064,907/
      DATA A(803),B(803)/201338880,801/
      DATA A(804),B(804)/33558528,913/
      DATA A(805),B(805)/50480572,910/
      DATA A(806),B(806)/201338880,804/
      DATA A(807),B(807)/234901504,807/
      DATA A(808),B(808)/33669120,916/
      DATA A(809),B(809)/201338880,807/
      DATA A(810),B(810)/33558528,922/
      DATA A(811),B(811)/50480483,919/
      DATA A(812),B(812)/201338880,810/
      DATA A(813),B(813)/234901504,813/
      DATA A(814),B(814)/134262784,61920/
      DATA A(815),B(815)/201338880,813/
      DATA A(816),B(816)/234901504,816/
      DATA A(817),B(817)/33615872,925/
      DATA A(818),B(818)/201338880,816/
      DATA A(819),B(819)/234901504,819/
      DATA A(820),B(820)/33644544,928/
      DATA A(821),B(821)/201338880,819/
      DATA A(822),B(822)/234901504,822/
      DATA A(823),B(823)/33648640,931/
      DATA A(824),B(824)/201338880,822/
      DATA A(825),B(825)/33558528,934/
      DATA A(826),B(826)/16949248,693/
      DATA A(827),B(827)/201338880,825/
      DATA A(828),B(828)/33558528,940/
      DATA A(829),B(829)/33722368,937/
      DATA A(830),B(830)/201338880,828/
      DATA A(831),B(831)/234901504,831/
      DATA A(832),B(832)/16949248,693/
      DATA A(833),B(833)/218292224,831/
      DATA A(834),B(834)/117641216,312124/
      DATA A(835),B(835)/201338880,831/
      DATA A(836),B(836)/33558528,698/
      DATA A(837),B(837)/16949248,693/
      DATA A(838),B(838)/33738752,690/
      DATA A(839),B(839)/201338880,836/
      DATA A(840),B(840)/234901504,840/
      DATA A(841),B(841)/33648640,943/
      DATA A(842),B(842)/201338880,840/
      DATA A(843),B(843)/234901504,843/
      DATA A(844),B(844)/33640448,946/
      DATA A(845),B(845)/201338880,843/
      DATA A(846),B(846)/234901504,846/
      DATA A(847),B(847)/33615872,949/
      DATA A(848),B(848)/201338880,846/
      DATA A(849),B(849)/234901504,849/
      DATA A(850),B(850)/134262784,180713/
      DATA A(851),B(851)/201338880,849/
      DATA A(852),B(852)/234901504,852/
      DATA A(853),B(853)/33615872,952/
      DATA A(854),B(854)/201338880,852/
      DATA A(855),B(855)/234901504,855/
      DATA A(856),B(856)/33607680,955/
      DATA A(857),B(857)/201338880,855/
      DATA A(858),B(858)/234901504,858/
      DATA A(859),B(859)/33665024,958/
      DATA A(860),B(860)/201338880,858/
      DATA A(861),B(861)/234901504,861/
      DATA A(862),B(862)/218144768,861/
      DATA A(863),B(863)/117596160,287681/
      DATA A(864),B(864)/201338880,861/
      DATA A(865),B(865)/234901504,865/
      DATA A(866),B(866)/134361088,328403/
      DATA A(867),B(867)/201338880,865/
      DATA A(868),B(868)/234901504,868/
      DATA A(869),B(869)/134262784,328644/
      DATA A(870),B(870)/201338880,868/
      DATA A(871),B(871)/234901504,871/
      DATA A(872),B(872)/134262784,328411/
      DATA A(873),B(873)/201338880,871/
      DATA A(874),B(874)/234901504,874/
      DATA A(875),B(875)/134262784,328420/
      DATA A(876),B(876)/201338880,874/
      DATA A(877),B(877)/33558528,743/
      DATA A(878),B(878)/33722368,610/
      DATA A(879),B(879)/50480483,740/
      DATA A(880),B(880)/184561664,877/
      DATA A(881),B(881)/33738752,969/
      DATA A(882),B(882)/100844972,3617267/
      DATA A(883),B(883)/50376739,499/
      DATA A(884),B(884)/201338880,881/
      DATA A(885),B(885)/234901504,885/
      DATA A(886),B(886)/134262784,328652/
      DATA A(887),B(887)/201338880,885/
      DATA A(888),B(888)/234901504,888/
      DATA A(889),B(889)/134262784,328442/
      DATA A(890),B(890)/201338880,888/
      DATA A(891),B(891)/234901504,891/
      DATA A(892),B(892)/134262784,328451/
      DATA A(893),B(893)/201338880,891/
      DATA A(894),B(894)/33558528,774/
      DATA A(895),B(895)/33722368,610/
      DATA A(896),B(896)/50480483,771/
      DATA A(897),B(897)/184561664,894/
      DATA A(898),B(898)/234901504,898/
      DATA A(899),B(899)/33669120,977/
      DATA A(900),B(900)/201338880,898/
      DATA A(901),B(901)/234901504,901/
      DATA A(902),B(902)/33640448,980/
      DATA A(903),B(903)/201338880,901/
      DATA A(904),B(904)/234901504,904/
      DATA A(905),B(905)/134422528,99287/
      DATA A(906),B(906)/201338880,904/
      DATA A(907),B(907)/234901504,907/
      DATA A(908),B(908)/33607680,990/
      DATA A(909),B(909)/201338880,907/
      DATA A(910),B(910)/33558528,993/
      DATA A(911),B(911)/268468224,8227/
      DATA A(912),B(912)/201338880,910/
      DATA A(913),B(913)/234901504,913/
      DATA A(914),B(914)/134356992,328484/
      DATA A(915),B(915)/201338880,913/
      DATA A(916),B(916)/234901504,916/
      DATA A(917),B(917)/134262784,81955/
      DATA A(918),B(918)/201338880,916/
      DATA A(919),B(919)/33558528,999/
      DATA A(920),B(920)/33665024,996/
      DATA A(921),B(921)/201338880,919/
      DATA A(922),B(922)/234901504,922/
      DATA A(923),B(923)/134356992,328490/
      DATA A(924),B(924)/201338880,922/
      DATA A(925),B(925)/234901504,925/
      DATA A(926),B(926)/33669120,1002/
      DATA A(927),B(927)/201338880,925/
      DATA A(928),B(928)/234901504,928/
      DATA A(929),B(929)/134262784,77859/
      DATA A(930),B(930)/201338880,928/
      DATA A(931),B(931)/234901504,931/
      DATA A(932),B(932)/33669120,1005/
      DATA A(933),B(933)/201338880,931/
      DATA A(934),B(934)/234901504,934/
      DATA A(935),B(935)/134246400,328505/
      DATA A(936),B(936)/201338880,934/
      DATA A(937),B(937)/234901504,937/
      DATA A(938),B(938)/134426624,201712/
      DATA A(939),B(939)/201338880,937/
      DATA A(940),B(940)/234901504,940/
      DATA A(941),B(941)/134418432,328508/
      DATA A(942),B(942)/201338880,940/
      DATA A(943),B(943)/234901504,943/
      DATA A(944),B(944)/33673216,1010/
      DATA A(945),B(945)/201338880,943/
      DATA A(946),B(946)/234901504,946/
      DATA A(947),B(947)/33615872,1013/
      DATA A(948),B(948)/201338880,946/
      DATA A(949),B(949)/234901504,949/
      DATA A(950),B(950)/33640448,1016/
      DATA A(951),B(951)/201338880,949/
      DATA A(952),B(952)/234901504,952/
      DATA A(953),B(953)/134262784,32803/
      DATA A(954),B(954)/201338880,952/
      DATA A(955),B(955)/234901504,955/
      DATA A(956),B(956)/33615872,1019/
      DATA A(957),B(957)/201338880,955/
      DATA A(958),B(958)/234901504,958/
      DATA A(959),B(959)/33656832,1022/
      DATA A(960),B(960)/201338880,958/
      DATA A(961),B(961)/33558528,1028/
      DATA A(962),B(962)/33665024,1025/
      DATA A(963),B(963)/201338880,961/
      DATA A(964),B(964)/33558528,868/
      DATA A(965),B(965)/33722368,610/
      DATA A(966),B(966)/50480524,606/
      DATA A(967),B(967)/16949248,601/
      DATA A(968),B(968)/184561664,964/
      DATA A(969),B(969)/234901504,969/
      DATA A(970),B(970)/134262784,197639/
      DATA A(971),B(971)/201338880,969/
      DATA A(972),B(972)/33558528,885/
      DATA A(973),B(973)/33722368,610/
      DATA A(974),B(974)/50480483,636/
      DATA A(975),B(975)/16949248,631/
      DATA A(976),B(976)/184561664,972/
      DATA A(977),B(977)/234901504,977/
      DATA A(978),B(978)/33615872,1034/
      DATA A(979),B(979)/201338880,977/
      DATA A(980),B(980)/234901504,980/
      DATA A(981),B(981)/134262784,114723/
      DATA A(982),B(982)/201338880,980/
      DATA A(983),B(983)/33558528,1053/
      DATA A(984),B(984)/33624064,1050/
      DATA A(985),B(985)/33640448,1047/
      DATA A(986),B(986)/33611776,1044/
      DATA A(987),B(987)/33607680,1040/
      DATA A(988),B(988)/33644544,1037/
      DATA A(989),B(989)/201338880,983/
      DATA A(990),B(990)/234901504,990/
      DATA A(991),B(991)/134262784,106531/
      DATA A(992),B(992)/201338880,990/
      DATA A(993),B(993)/234901504,993/
      DATA A(994),B(994)/134254592,328590/
      DATA A(995),B(995)/201338880,993/
      DATA A(996),B(996)/234901504,996/
      DATA A(997),B(997)/33685504,1056/
      DATA A(998),B(998)/201338880,996/
      DATA A(999),B(999)/234901504,999/
      DATA A(1000),B(1000)/134373376,328599/
      DATA A(1001),B(1001)/201338880,999/
      DATA A(1002),B(1002)/234901504,1002/
      DATA A(1003),B(1003)/33607680,1059/
      DATA A(1004),B(1004)/201338880,1002/
      DATA A(1005),B(1005)/234901504,1005/
      DATA A(1006),B(1006)/134262784,45091/
      DATA A(1007),B(1007)/201338880,1005/
      DATA A(1008),B(1008)/50345442,1062/
      DATA A(1009),B(1009)/201338880,1008/
      DATA A(1010),B(1010)/234901504,1010/
      DATA A(1011),B(1011)/33628160,1065/
      DATA A(1012),B(1012)/201338880,1010/
      DATA A(1013),B(1013)/234901504,1013/
      DATA A(1014),B(1014)/33607680,1068/
      DATA A(1015),B(1015)/201338880,1013/
      DATA A(1016),B(1016)/234901504,1016/
      DATA A(1017),B(1017)/134262784,188905/
      DATA A(1018),B(1018)/201338880,1016/
      DATA A(1019),B(1019)/234901504,1019/
      DATA A(1020),B(1020)/134262784,12768/
      DATA A(1021),B(1021)/201338880,1019/
      DATA A(1022),B(1022)/234901504,1022/
      DATA A(1023),B(1023)/134262784,16419/
      DATA A(1024),B(1024)/201338880,1022/
      DATA A(1025),B(1025)/234901504,1025/
      DATA A(1026),B(1026)/33648640,1071/
      DATA A(1027),B(1027)/201338880,1025/
      DATA A(1028),B(1028)/234901504,1028/
      DATA A(1029),B(1029)/134373376,328641/
      DATA A(1030),B(1030)/201338880,1028/
      DATA A(1031),B(1031)/100844972,4227571/
      DATA A(1032),B(1032)/50376739,499/
      DATA A(1033),B(1033)/201338880,1031/
      DATA A(1034),B(1034)/234901504,1034/
      DATA A(1035),B(1035)/134262784,151587/
      DATA A(1036),B(1036)/201338880,1034/
      DATA A(1037),B(1037)/234901504,1037/
      DATA A(1038),B(1038)/33648640,1074/
      DATA A(1039),B(1039)/201338880,1037/
      DATA A(1040),B(1040)/234901504,1040/
      DATA A(1041),B(1041)/33648640,1080/
      DATA A(1042),B(1042)/33685504,1077/
      DATA A(1043),B(1043)/201338880,1040/
      DATA A(1044),B(1044)/234901504,1044/
      DATA A(1045),B(1045)/33648640,1083/
      DATA A(1046),B(1046)/201338880,1044/
      DATA A(1047),B(1047)/234901504,1047/
      DATA A(1048),B(1048)/33615872,1086/
      DATA A(1049),B(1049)/201338880,1047/
      DATA A(1050),B(1050)/234901504,1050/
      DATA A(1051),B(1051)/33669120,1089/
      DATA A(1052),B(1052)/201338880,1050/
      DATA A(1053),B(1053)/234901504,1053/
      DATA A(1054),B(1054)/134422528,328663/
      DATA A(1055),B(1055)/201338880,1053/
      DATA A(1056),B(1056)/234901504,1056/
      DATA A(1057),B(1057)/33615872,1092/
      DATA A(1058),B(1058)/201338880,1056/
      DATA A(1059),B(1059)/234901504,1059/
      DATA A(1060),B(1060)/33615872,1095/
      DATA A(1061),B(1061)/201338880,1059/
      DATA A(1062),B(1062)/33558528,1101/
      DATA A(1063),B(1063)/33738752,1098/
      DATA A(1064),B(1064)/201338880,1062/
      DATA A(1065),B(1065)/234901504,1065/
      DATA A(1066),B(1066)/33644544,1104/
      DATA A(1067),B(1067)/201338880,1065/
      DATA A(1068),B(1068)/234901504,1068/
      DATA A(1069),B(1069)/33624064,1107/
      DATA A(1070),B(1070)/201338880,1068/
      DATA A(1071),B(1071)/234901504,1071/
      DATA A(1072),B(1072)/134262784,159779/
      DATA A(1073),B(1073)/201338880,1071/
      DATA A(1074),B(1074)/234901504,1074/
      DATA A(1075),B(1075)/33636352,1110/
      DATA A(1076),B(1076)/201338880,1074/
      DATA A(1077),B(1077)/234901504,1077/
      DATA A(1078),B(1078)/33656832,1113/
      DATA A(1079),B(1079)/201338880,1077/
      DATA A(1080),B(1080)/234901504,1080/
      DATA A(1081),B(1081)/33673216,1116/
      DATA A(1082),B(1082)/201338880,1080/
      DATA A(1083),B(1083)/234901504,1083/
      DATA A(1084),B(1084)/33660928,1119/
      DATA A(1085),B(1085)/201338880,1083/
      DATA A(1086),B(1086)/234901504,1086/
      DATA A(1087),B(1087)/33656832,1122/
      DATA A(1088),B(1088)/201338880,1086/
      DATA A(1089),B(1089)/234901504,1089/
      DATA A(1090),B(1090)/33665024,1125/
      DATA A(1091),B(1091)/201338880,1089/
      DATA A(1092),B(1092)/234901504,1092/
      DATA A(1093),B(1093)/33669120,1128/
      DATA A(1094),B(1094)/201338880,1092/
      DATA A(1095),B(1095)/234901504,1095/
      DATA A(1096),B(1096)/134262784,73763/
      DATA A(1097),B(1097)/201338880,1095/
      DATA A(1098),B(1098)/234901504,1098/
      DATA A(1099),B(1099)/134262784,196643/
      DATA A(1100),B(1100)/201338880,1098/
      DATA A(1101),B(1101)/234901504,1101/
      DATA A(1102),B(1102)/134430720,328742/
      DATA A(1103),B(1103)/201338880,1101/
      DATA A(1104),B(1104)/234901504,1104/
      DATA A(1105),B(1105)/33615872,1131/
      DATA A(1106),B(1106)/201338880,1104/
      DATA A(1107),B(1107)/234901504,1107/
      DATA A(1108),B(1108)/33632256,1134/
      DATA A(1109),B(1109)/201338880,1107/
      DATA A(1110),B(1110)/234901504,1110/
      DATA A(1111),B(1111)/33624064,1137/
      DATA A(1112),B(1112)/201338880,1110/
      DATA A(1113),B(1113)/234901504,1113/
      DATA A(1114),B(1114)/33640448,1140/
      DATA A(1115),B(1115)/201338880,1113/
      DATA A(1116),B(1116)/234901504,1116/
      DATA A(1117),B(1117)/33628160,1143/
      DATA A(1118),B(1118)/201338880,1116/
      DATA A(1119),B(1119)/234901504,1119/
      DATA A(1120),B(1120)/33603584,1146/
      DATA A(1121),B(1121)/201338880,1119/
      DATA A(1122),B(1122)/234901504,1122/
      DATA A(1123),B(1123)/33644544,1149/
      DATA A(1124),B(1124)/201338880,1122/
      DATA A(1125),B(1125)/234901504,1125/
      DATA A(1126),B(1126)/33615872,1152/
      DATA A(1127),B(1127)/201338880,1125/
      DATA A(1128),B(1128)/234901504,1128/
      DATA A(1129),B(1129)/134262784,155683/
      DATA A(1130),B(1130)/201338880,1128/
      DATA A(1131),B(1131)/234901504,1131/
      DATA A(1132),B(1132)/33677312,1155/
      DATA A(1133),B(1133)/201338880,1131/
      DATA A(1134),B(1134)/234901504,1134/
      DATA A(1135),B(1135)/33624064,1158/
      DATA A(1136),B(1136)/201338880,1134/
      DATA A(1137),B(1137)/234901504,1137/
      DATA A(1138),B(1138)/33607680,1161/
      DATA A(1139),B(1139)/201338880,1137/
      DATA A(1140),B(1140)/234901504,1140/
      DATA A(1141),B(1141)/33656832,1164/
      DATA A(1142),B(1142)/201338880,1140/
      DATA A(1143),B(1143)/234901504,1143/
      DATA A(1144),B(1144)/33644544,1167/
      DATA A(1145),B(1145)/201338880,1143/
      DATA A(1146),B(1146)/234901504,1146/
      DATA A(1147),B(1147)/33644544,1170/
      DATA A(1148),B(1148)/201338880,1146/
      DATA A(1149),B(1149)/234901504,1149/
      DATA A(1150),B(1150)/134434816,173205/
      DATA A(1151),B(1151)/201338880,1149/
      DATA A(1152),B(1152)/234901504,1152/
      DATA A(1153),B(1153)/33636352,1177/
      DATA A(1154),B(1154)/201338880,1152/
      DATA A(1155),B(1155)/234901504,1155/
      DATA A(1156),B(1156)/134262784,193001/
      DATA A(1157),B(1157)/201338880,1155/
      DATA A(1158),B(1158)/234901504,1158/
      DATA A(1159),B(1159)/33648640,1180/
      DATA A(1160),B(1160)/201338880,1158/
      DATA A(1161),B(1161)/234901504,1161/
      DATA A(1162),B(1162)/33656832,1183/
      DATA A(1163),B(1163)/201338880,1161/
      DATA A(1164),B(1164)/234901504,1164/
      DATA A(1165),B(1165)/33607680,1186/
      DATA A(1166),B(1166)/201338880,1164/
      DATA A(1167),B(1167)/234901504,1167/
      DATA A(1168),B(1168)/33615872,1189/
      DATA A(1169),B(1169)/201338880,1167/
      DATA A(1170),B(1170)/234901504,1170/
      DATA A(1171),B(1171)/33615872,1192/
      DATA A(1172),B(1172)/201338880,1170/
      DATA A(1173),B(1173)/33558528,1202/
      DATA A(1174),B(1174)/50480483,1199/
      DATA A(1175),B(1175)/33730560,1196/
      DATA A(1176),B(1176)/201338880,1173/
      DATA A(1177),B(1177)/234901504,1177/
      DATA A(1178),B(1178)/33615872,1205/
      DATA A(1179),B(1179)/201338880,1177/
      DATA A(1180),B(1180)/234901504,1180/
      DATA A(1181),B(1181)/33669120,1208/
      DATA A(1182),B(1182)/201338880,1180/
      DATA A(1183),B(1183)/234901504,1183/
      DATA A(1184),B(1184)/33644544,1211/
      DATA A(1185),B(1185)/201338880,1183/
      DATA A(1186),B(1186)/234901504,1186/
      DATA A(1187),B(1187)/33665024,1214/
      DATA A(1188),B(1188)/201338880,1186/
      DATA A(1189),B(1189)/234901504,1189/
      DATA A(1190),B(1190)/33677312,1217/
      DATA A(1191),B(1191)/201338880,1189/
      DATA A(1192),B(1192)/234901504,1192/
      DATA A(1193),B(1193)/33628160,1223/
      DATA A(1194),B(1194)/33607680,1220/
      DATA A(1195),B(1195)/201338880,1192/
      DATA A(1196),B(1196)/234901504,1196/
      DATA A(1197),B(1197)/134414336,263370/
      DATA A(1198),B(1198)/201338880,1196/
      DATA A(1199),B(1199)/33558528,1231/
      DATA A(1200),B(1200)/33738752,1228/
      DATA A(1201),B(1201)/184561664,1199/
      DATA A(1202),B(1202)/234901504,1202/
      DATA A(1203),B(1203)/134356992,328914/
      DATA A(1204),B(1204)/201338880,1202/
      DATA A(1205),B(1205)/234901504,1205/
      DATA A(1206),B(1206)/33640448,1237/
      DATA A(1207),B(1207)/201338880,1205/
      DATA A(1208),B(1208)/234901504,1208/
      DATA A(1209),B(1209)/134262784,176617/
      DATA A(1210),B(1210)/201338880,1208/
      DATA A(1211),B(1211)/234901504,1211/
      DATA A(1212),B(1212)/134434816,185493/
      DATA A(1213),B(1213)/201338880,1211/
      DATA A(1214),B(1214)/234901504,1214/
      DATA A(1215),B(1215)/33615872,1240/
      DATA A(1216),B(1216)/201338880,1214/
      DATA A(1217),B(1217)/234901504,1217/
      DATA A(1218),B(1218)/134434816,181397/
      DATA A(1219),B(1219)/201338880,1217/
      DATA A(1220),B(1220)/234901504,1220/
      DATA A(1221),B(1221)/33648640,1243/
      DATA A(1222),B(1222)/201338880,1220/
      DATA A(1223),B(1223)/234901504,1223/
      DATA A(1224),B(1224)/33640448,1246/
      DATA A(1225),B(1225)/201338880,1223/
      DATA A(1226),B(1226)/50345397,1249/
      DATA A(1227),B(1227)/201338880,1226/
      DATA A(1228),B(1228)/234901504,1228/
      DATA A(1229),B(1229)/134422528,197591/
      DATA A(1230),B(1230)/201338880,1228/
      DATA A(1231),B(1231)/234901504,1231/
      DATA A(1232),B(1232)/134430720,328933/
      DATA A(1233),B(1233)/201338880,1231/
      DATA A(1234),B(1234)/33558528,1202/
      DATA A(1235),B(1235)/50480483,1199/
      DATA A(1236),B(1236)/201338880,1234/
      DATA A(1237),B(1237)/234901504,1237/
      DATA A(1238),B(1238)/134434816,169109/
      DATA A(1239),B(1239)/201338880,1237/
      DATA A(1240),B(1240)/234901504,1240/
      DATA A(1241),B(1241)/33640448,1256/
      DATA A(1242),B(1242)/201338880,1240/
      DATA A(1243),B(1243)/234901504,1243/
      DATA A(1244),B(1244)/33673216,1259/
      DATA A(1245),B(1245)/201338880,1243/
      DATA A(1246),B(1246)/234901504,1246/
      DATA A(1247),B(1247)/33615872,1262/
      DATA A(1248),B(1248)/201338880,1246/
      DATA A(1249),B(1249)/33558528,1202/
      DATA A(1250),B(1250)/50480483,1199/
      DATA A(1251),B(1251)/33738752,1265/
      DATA A(1252),B(1252)/201338880,1249/
      DATA A(1253),B(1253)/33558528,1231/
      DATA A(1254),B(1254)/33738752,1228/
      DATA A(1255),B(1255)/201338880,1253/
      DATA A(1256),B(1256)/234901504,1256/
      DATA A(1257),B(1257)/134434816,189589/
      DATA A(1258),B(1258)/201338880,1256/
      DATA A(1259),B(1259)/234901504,1259/
      DATA A(1260),B(1260)/33628160,1268/
      DATA A(1261),B(1261)/201338880,1259/
      DATA A(1262),B(1262)/234901504,1262/
      DATA A(1263),B(1263)/33607680,1271/
      DATA A(1264),B(1264)/201338880,1262/
      DATA A(1265),B(1265)/234901504,1265/
      DATA A(1266),B(1266)/134356992,197842/
      DATA A(1267),B(1267)/201338880,1265/
      DATA A(1268),B(1268)/234901504,1268/
      DATA A(1269),B(1269)/33644544,1274/
      DATA A(1270),B(1270)/201338880,1268/
      DATA A(1271),B(1271)/234901504,1271/
      DATA A(1272),B(1272)/33624064,1277/
      DATA A(1273),B(1273)/201338880,1271/
      DATA A(1274),B(1274)/234901504,1274/
      DATA A(1275),B(1275)/33615872,1280/
      DATA A(1276),B(1276)/201338880,1274/
      DATA A(1277),B(1277)/234901504,1277/
      DATA A(1278),B(1278)/33632256,1283/
      DATA A(1279),B(1279)/201338880,1277/
      DATA A(1280),B(1280)/234901504,1280/
      DATA A(1281),B(1281)/33677312,1286/
      DATA A(1282),B(1282)/201338880,1280/
      DATA A(1283),B(1283)/234901504,1283/
      DATA A(1284),B(1284)/33624064,1289/
      DATA A(1285),B(1285)/201338880,1283/
      DATA A(1286),B(1286)/234901504,1286/
      DATA A(1287),B(1287)/134434816,193685/
      DATA A(1288),B(1288)/201338880,1286/
      DATA A(1289),B(1289)/234901504,1289/
      DATA A(1290),B(1290)/33648640,1292/
      DATA A(1291),B(1291)/201338880,1289/
      DATA A(1292),B(1292)/234901504,1292/
      DATA A(1293),B(1293)/33669120,1295/
      DATA A(1294),B(1294)/201338880,1292/
      DATA A(1295),B(1295)/234901504,1295/
      DATA A(1296),B(1296)/134434816,177301/
      DATA A(1297),B(1297)/201338880,1295/
      DATA A(1298),B(1298)/33558528,1306/
      DATA A(1299),B(1299)/16949248,1301/
      DATA A(1300),B(1300)/201338880,1298/
      DATA A(1301),B(1301)/234901504,1301/
      DATA A(1302),B(1302)/218275840,1301/
      DATA A(1303),B(1303)/16965632,1313/
      DATA A(1304),B(1304)/117661696,312605/
      DATA A(1305),B(1305)/201338880,1301/
      DATA A(1306),B(1306)/234901504,1306/
      DATA A(1307),B(1307)/134246400,328978/
      DATA A(1308),B(1308)/201338880,1306/
      DATA A(1309),B(1309)/33558528,1325/
      DATA A(1310),B(1310)/33722368,1322/
      DATA A(1311),B(1311)/50480483,1318/
      DATA A(1312),B(1312)/201338880,1309/
      DATA A(1313),B(1313)/234901504,1313/
      DATA A(1314),B(1314)/16949248,1301/
      DATA A(1315),B(1315)/218292224,1313/
      DATA A(1316),B(1316)/117661696,312605/
      DATA A(1317),B(1317)/201338880,1313/
      DATA A(1318),B(1318)/33558528,1331/
      DATA A(1319),B(1319)/33722368,1322/
      DATA A(1320),B(1320)/50480483,1328/
      DATA A(1321),B(1321)/201338880,1318/
      DATA A(1322),B(1322)/234901504,1322/
      DATA A(1323),B(1323)/134262784,200739/
      DATA A(1324),B(1324)/201338880,1322/
      DATA A(1325),B(1325)/234901504,1325/
      DATA A(1326),B(1326)/134438912,329014/
      DATA A(1327),B(1327)/201338880,1325/
      DATA A(1328),B(1328)/33558528,1338/
      DATA A(1329),B(1329)/33722368,1322/
      DATA A(1330),B(1330)/201338880,1328/
      DATA A(1331),B(1331)/234901504,1331/
      DATA A(1332),B(1332)/134438912,329021/
      DATA A(1333),B(1333)/201338880,1331/
      DATA A(1334),B(1334)/33558528,1325/
      DATA A(1335),B(1335)/33722368,1322/
      DATA A(1336),B(1336)/50480483,1318/
      DATA A(1337),B(1337)/201338880,1334/
      DATA A(1338),B(1338)/234901504,1338/
      DATA A(1339),B(1339)/134418432,329008/
      DATA A(1340),B(1340)/201338880,1338/
      DATA A(1341),B(1341)/33558528,1331/
      DATA A(1342),B(1342)/33722368,1322/
      DATA A(1343),B(1343)/50480483,1328/
      DATA A(1344),B(1344)/201338880,1341/
      DATA A(1345),B(1345)/33558528,1368/
      DATA A(1346),B(1346)/50558445,1345/
      DATA A(1347),B(1347)/33738752,1365/
      DATA A(1348),B(1348)/33722368,1362/
      DATA A(1349),B(1349)/33783808,1359/
      DATA A(1350),B(1350)/33701888,1356/
      DATA A(1351),B(1351)/33787904,1353/
      DATA A(1352),B(1352)/184561664,1345/
      DATA A(1353),B(1353)/234901504,1353/
      DATA A(1354),B(1354)/134262784,214337/
      DATA A(1355),B(1355)/201338880,1353/
      DATA A(1356),B(1356)/234901504,1356/
      DATA A(1357),B(1357)/134262784,210241/
      DATA A(1358),B(1358)/201338880,1356/
      DATA A(1359),B(1359)/234901504,1359/
      DATA A(1360),B(1360)/134262784,206145/
      DATA A(1361),B(1361)/201338880,1359/
      DATA A(1362),B(1362)/234901504,1362/
      DATA A(1363),B(1363)/134262784,202049/
      DATA A(1364),B(1364)/201338880,1362/
      DATA A(1365),B(1365)/234901504,1365/
      DATA A(1366),B(1366)/134262784,197953/
      DATA A(1367),B(1367)/201338880,1365/
      DATA A(1368),B(1368)/234901504,1368/
      DATA A(1369),B(1369)/134455296,329051/
      DATA A(1370),B(1370)/201338880,1368/
      DATA A(1371),B(1371)/33558528,1368/
      DATA A(1372),B(1372)/50558445,1345/
      DATA A(1373),B(1373)/33738752,1365/
      DATA A(1374),B(1374)/33722368,1362/
      DATA A(1375),B(1375)/33783808,1359/
      DATA A(1376),B(1376)/33701888,1356/
      DATA A(1377),B(1377)/33787904,1353/
      DATA A(1378),B(1378)/201338880,1371/
      DATA A(1379),B(1379)/33701888,1381/
      DATA A(1380),B(1380)/201338880,1379/
      DATA A(1381),B(1381)/234901504,1381/
      DATA A(1382),B(1382)/134455296,210280/
      DATA A(1383),B(1383)/201338880,1381/
      DATA A(1384),B(1384)/33558528,1404/
      DATA A(1385),B(1385)/50558445,1384/
      DATA A(1386),B(1386)/33738752,1401/
      DATA A(1387),B(1387)/33722368,1398/
      DATA A(1388),B(1388)/33783808,1395/
      DATA A(1389),B(1389)/50480483,1384/
      DATA A(1390),B(1390)/33787904,1392/
      DATA A(1391),B(1391)/201338880,1384/
      DATA A(1392),B(1392)/234901504,1392/
      DATA A(1393),B(1393)/134262784,213027/
      DATA A(1394),B(1394)/201338880,1392/
      DATA A(1395),B(1395)/234901504,1395/
      DATA A(1396),B(1396)/134455296,206184/
      DATA A(1397),B(1397)/201338880,1395/
      DATA A(1398),B(1398)/234901504,1398/
      DATA A(1399),B(1399)/134455296,202088/
      DATA A(1400),B(1400)/201338880,1398/
      DATA A(1401),B(1401)/234901504,1401/
      DATA A(1402),B(1402)/134455296,197992/
      DATA A(1403),B(1403)/201338880,1401/
      DATA A(1404),B(1404)/234901504,1404/
      DATA A(1405),B(1405)/134459392,329087/
      DATA A(1406),B(1406)/201338880,1404/
      DATA A(1407),B(1407)/33558528,1404/
      DATA A(1408),B(1408)/50558445,1384/
      DATA A(1409),B(1409)/33738752,1401/
      DATA A(1410),B(1410)/33722368,1398/
      DATA A(1411),B(1411)/33783808,1395/
      DATA A(1412),B(1412)/50480483,1384/
      DATA A(1413),B(1413)/201338880,1407/
      DATA A(1414),B(1414)/33558528,1417/
      DATA A(1415),B(1415)/33665024,996/
      DATA A(1416),B(1416)/201338880,1414/
      DATA A(1417),B(1417)/234901504,1417/
      DATA A(1418),B(1418)/134373376,329094/
      DATA A(1419),B(1419)/201338880,1417/
      DATA A(1420),B(1420)/33701888,1422/
      DATA A(1421),B(1421)/201338880,1420/
      DATA A(1422),B(1422)/234901504,1422/
      DATA A(1423),B(1423)/134455296,210321/
      DATA A(1424),B(1424)/201338880,1422/
      DATA A(1425),B(1425)/33558528,1442/
      DATA A(1426),B(1426)/50558671,1425/
      DATA A(1427),B(1427)/33738752,1439/
      DATA A(1428),B(1428)/33722368,1436/
      DATA A(1429),B(1429)/33783808,1433/
      DATA A(1430),B(1430)/50480483,1425/
      DATA A(1431),B(1431)/33787904,1392/
      DATA A(1432),B(1432)/201338880,1425/
      DATA A(1433),B(1433)/234901504,1433/
      DATA A(1434),B(1434)/134455296,206225/
      DATA A(1435),B(1435)/201338880,1433/
      DATA A(1436),B(1436)/234901504,1436/
      DATA A(1437),B(1437)/134455296,202129/
      DATA A(1438),B(1438)/201338880,1436/
      DATA A(1439),B(1439)/234901504,1439/
      DATA A(1440),B(1440)/134455296,198033/
      DATA A(1441),B(1441)/201338880,1439/
      DATA A(1442),B(1442)/234901504,1442/
      DATA A(1443),B(1443)/134459392,329125/
      DATA A(1444),B(1444)/201338880,1442/
      DATA A(1445),B(1445)/33558528,1442/
      DATA A(1446),B(1446)/50558671,1425/
      DATA A(1447),B(1447)/33738752,1439/
      DATA A(1448),B(1448)/33722368,1436/
      DATA A(1449),B(1449)/33783808,1433/
      DATA A(1450),B(1450)/50480483,1425/
      DATA A(1451),B(1451)/201338880,1445/
      DATA A(1452),B(1452)/33558528,1458/
      DATA A(1453),B(1453)/33619968,1455/
      DATA A(1454),B(1454)/201338880,1452/
      DATA A(1455),B(1455)/234901504,1455/
      DATA A(1456),B(1456)/33660928,162/
      DATA A(1457),B(1457)/201338880,1455/
      DATA A(1458),B(1458)/234901504,1458/
      DATA A(1459),B(1459)/134397952,329132/
      DATA A(1460),B(1460)/201338880,1458/
      DATA A(1461),B(1461)/16818176,1464/
      DATA A(1462),B(1462)/50480483,35/
      DATA A(1463),B(1463)/201338880,1461/
      DATA A(1464),B(1464)/234901504,1464/
      DATA A(1465),B(1465)/218144768,1464/
      DATA A(1466),B(1466)/117485568,286755/
      DATA A(1467),B(1467)/201338880,1464/
      DATA A(1468),B(1468)/33701888,1470/
      DATA A(1469),B(1469)/201338880,1468/
      DATA A(1470),B(1470)/234901504,1470/
      DATA A(1471),B(1471)/134463488,210369/
      DATA A(1472),B(1472)/201338880,1470/
      DATA A(1473),B(1473)/50583268,1488/
      DATA A(1474),B(1474)/33808384,1485/
      DATA A(1475),B(1475)/33738752,1482/
      DATA A(1476),B(1476)/33783808,1479/
      DATA A(1477),B(1477)/33787904,1392/
      DATA A(1478),B(1478)/201338880,1473/
      DATA A(1479),B(1479)/234901504,1479/
      DATA A(1480),B(1480)/134463488,206294/
      DATA A(1481),B(1481)/201338880,1479/
      DATA A(1482),B(1482)/234901504,1482/
      DATA A(1483),B(1483)/134463488,198081/
      DATA A(1484),B(1484)/201338880,1482/
      DATA A(1485),B(1485)/234901504,1485/
      DATA A(1486),B(1486)/134463488,280028/
      DATA A(1487),B(1487)/201338880,1485/
      DATA A(1488),B(1488)/33738752,1482/
      DATA A(1489),B(1489)/33808384,1485/
      DATA A(1490),B(1490)/50583268,1488/
      DATA A(1491),B(1491)/33783808,1479/
      DATA A(1492),B(1492)/33787904,1392/
      DATA A(1493),B(1493)/201338880,1488/
      DATA A(1494),B(1494)/33783808,1479/
      DATA A(1495),B(1495)/50583268,1488/
      DATA A(1496),B(1496)/33808384,1485/
      DATA A(1497),B(1497)/33738752,1482/
      DATA A(1498),B(1498)/33787904,1392/
      DATA A(1499),B(1499)/201338880,1494/
      DATA A(1500),B(1500)/33808384,1485/
      DATA A(1501),B(1501)/50583268,1488/
      DATA A(1502),B(1502)/33738752,1482/
      DATA A(1503),B(1503)/33783808,1479/
      DATA A(1504),B(1504)/33787904,1392/
      DATA A(1505),B(1505)/201338880,1500/
      DATA A(1506),B(1506)/33558528,1514/
      DATA A(1507),B(1507)/50558445,1510/
      DATA A(1508),B(1508)/50480483,1510/
      DATA A(1509),B(1509)/201338880,1506/
      DATA A(1510),B(1510)/33558528,1514/
      DATA A(1511),B(1511)/50558445,1510/
      DATA A(1512),B(1512)/50480483,1510/
      DATA A(1513),B(1513)/184561664,1510/
      DATA A(1514),B(1514)/234901504,1514/
      DATA A(1515),B(1515)/134426624,329186/
      DATA A(1516),B(1516)/201338880,1514/
      DATA A(1517),B(1517)/16949248,1556/
      DATA A(1518),B(1518)/33812480,1535/
      DATA A(1519),B(1519)/33816576,1532/
      DATA A(1520),B(1520)/33808384,1528/
      DATA A(1521),B(1521)/17043456,1545/
      DATA A(1522),B(1522)/33824768,1542/
      DATA A(1523),B(1523)/33730560,1538/
      DATA A(1524),B(1524)/100706192,6246435/
      DATA A(1525),B(1525)/100706239,6250531/
      DATA A(1526),B(1526)/50374544,35/
      DATA A(1527),B(1527)/201338880,1517/
      DATA A(1528),B(1528)/234901504,1528/
      DATA A(1529),B(1529)/33808384,1561/
      DATA A(1530),B(1530)/134262784,278563/
      DATA A(1531),B(1531)/201338880,1528/
      DATA A(1532),B(1532)/234901504,1532/
      DATA A(1533),B(1533)/134262784,274467/
      DATA A(1534),B(1534)/201338880,1532/
      DATA A(1535),B(1535)/234901504,1535/
      DATA A(1536),B(1536)/134262784,270371/
      DATA A(1537),B(1537)/201338880,1535/
      DATA A(1538),B(1538)/234901504,1538/
      DATA A(1539),B(1539)/33730560,1564/
      DATA A(1540),B(1540)/134262784,262179/
      DATA A(1541),B(1541)/201338880,1538/
      DATA A(1542),B(1542)/17051648,1569/
      DATA A(1543),B(1543)/33824768,1567/
      DATA A(1544),B(1544)/201338880,1542/
      DATA A(1545),B(1545)/234901504,1545/
      DATA A(1546),B(1546)/16891904,1601/
      DATA A(1547),B(1547)/16838656,1598/
      DATA A(1548),B(1548)/16871424,1595/
      DATA A(1549),B(1549)/16879616,1592/
      DATA A(1550),B(1550)/16859136,1588/
      DATA A(1551),B(1551)/16867328,1584/
      DATA A(1552),B(1552)/16842752,1581/
      DATA A(1553),B(1553)/16887808,1578/
      DATA A(1554),B(1554)/16818176,1572/
      DATA A(1555),B(1555)/201338880,1545/
      DATA A(1556),B(1556)/234901504,1556/
      DATA A(1557),B(1557)/218275840,1556/
      DATA A(1558),B(1558)/16965632,1605/
      DATA A(1559),B(1559)/117485568,311331/
      DATA A(1560),B(1560)/201338880,1556/
      DATA A(1561),B(1561)/234901504,1561/
      DATA A(1562),B(1562)/134262784,282659/
      DATA A(1563),B(1563)/201338880,1561/
      DATA A(1564),B(1564)/234901504,1564/
      DATA A(1565),B(1565)/134262784,266275/
      DATA A(1566),B(1566)/201338880,1564/
      DATA A(1567),B(1567)/17047552,1569/
      DATA A(1568),B(1568)/201338880,1567/
      DATA A(1569),B(1569)/218378240,1569/
      DATA A(1570),B(1570)/33824768,1610/
      DATA A(1571),B(1571)/201338880,1569/
      DATA A(1572),B(1572)/234901504,1572/
      DATA A(1573),B(1573)/218144768,1572/
      DATA A(1574),B(1574)/16834560,1618/
      DATA A(1575),B(1575)/16838656,1614/
      DATA A(1576),B(1576)/117485568,294947/
      DATA A(1577),B(1577)/201338880,1572/
      DATA A(1578),B(1578)/234901504,1578/
      DATA A(1579),B(1579)/16863232,1622/
      DATA A(1580),B(1580)/201338880,1578/
      DATA A(1581),B(1581)/234901504,1581/
      DATA A(1582),B(1582)/16879616,1625/
      DATA A(1583),B(1583)/201338880,1581/
      DATA A(1584),B(1584)/234901504,1584/
      DATA A(1585),B(1585)/16887808,1631/
      DATA A(1586),B(1586)/16838656,1628/
      DATA A(1587),B(1587)/201338880,1584/
      DATA A(1588),B(1588)/234901504,1588/
      DATA A(1589),B(1589)/16887808,1637/
      DATA A(1590),B(1590)/16838656,1634/
      DATA A(1591),B(1591)/201338880,1588/
      DATA A(1592),B(1592)/234901504,1592/
      DATA A(1593),B(1593)/16891904,1640/
      DATA A(1594),B(1594)/201338880,1592/
      DATA A(1595),B(1595)/234901504,1595/
      DATA A(1596),B(1596)/16863232,1643/
      DATA A(1597),B(1597)/201338880,1595/
      DATA A(1598),B(1598)/234901504,1598/
      DATA A(1599),B(1599)/16904192,1646/
      DATA A(1600),B(1600)/201338880,1598/
      DATA A(1601),B(1601)/234901504,1601/
      DATA A(1602),B(1602)/16871424,1654/
      DATA A(1603),B(1603)/16838656,1650/
      DATA A(1604),B(1604)/201338880,1601/
      DATA A(1605),B(1605)/234901504,1605/
      DATA A(1606),B(1606)/16949248,1556/
      DATA A(1607),B(1607)/218292224,1605/
      DATA A(1608),B(1608)/117485568,311331/
      DATA A(1609),B(1609)/201338880,1605/
      DATA A(1610),B(1610)/33574912,1657/
      DATA A(1611),B(1611)/17047552,1569/
      DATA A(1612),B(1612)/117485568,303139/
      DATA A(1613),B(1613)/201338880,1610/
      DATA A(1614),B(1614)/234901504,1614/
      DATA A(1615),B(1615)/16818176,1663/
      DATA A(1616),B(1616)/17055744,1660/
      DATA A(1617),B(1617)/201338880,1614/
      DATA A(1618),B(1618)/234901504,1618/
      DATA A(1619),B(1619)/16818176,1670/
      DATA A(1620),B(1620)/17055744,1667/
      DATA A(1621),B(1621)/201338880,1618/
      DATA A(1622),B(1622)/234901504,1622/
      DATA A(1623),B(1623)/16883712,1674/
      DATA A(1624),B(1624)/201338880,1622/
      DATA A(1625),B(1625)/234901504,1625/
      DATA A(1626),B(1626)/16867328,1677/
      DATA A(1627),B(1627)/201338880,1625/
      DATA A(1628),B(1628)/234901504,1628/
      DATA A(1629),B(1629)/17043456,1680/
      DATA A(1630),B(1630)/201338880,1628/
      DATA A(1631),B(1631)/234901504,1631/
      DATA A(1632),B(1632)/17043456,1683/
      DATA A(1633),B(1633)/201338880,1631/
      DATA A(1634),B(1634)/234901504,1634/
      DATA A(1635),B(1635)/17043456,1686/
      DATA A(1636),B(1636)/201338880,1634/
      DATA A(1637),B(1637)/234901504,1637/
      DATA A(1638),B(1638)/17043456,1689/
      DATA A(1639),B(1639)/201338880,1637/
      DATA A(1640),B(1640)/234901504,1640/
      DATA A(1641),B(1641)/16834560,1692/
      DATA A(1642),B(1642)/201338880,1640/
      DATA A(1643),B(1643)/234901504,1643/
      DATA A(1644),B(1644)/17043456,1695/
      DATA A(1645),B(1645)/201338880,1643/
      DATA A(1646),B(1646)/234901504,1646/
      DATA A(1647),B(1647)/16912384,1701/
      DATA A(1648),B(1648)/17043456,1698/
      DATA A(1649),B(1649)/201338880,1646/
      DATA A(1650),B(1650)/234901504,1650/
      DATA A(1651),B(1651)/16904192,1707/
      DATA A(1652),B(1652)/17043456,1704/
      DATA A(1653),B(1653)/201338880,1650/
      DATA A(1654),B(1654)/234901504,1654/
      DATA A(1655),B(1655)/16887808,1710/
      DATA A(1656),B(1656)/201338880,1654/
      DATA A(1657),B(1657)/234901504,1657/
      DATA A(1658),B(1658)/117485568,303139/
      DATA A(1659),B(1659)/201338880,1657/
      DATA A(1660),B(1660)/234901504,1660/
      DATA A(1661),B(1661)/16818176,1663/
      DATA A(1662),B(1662)/201338880,1660/
      DATA A(1663),B(1663)/234901504,1663/
      DATA A(1664),B(1664)/218144768,1663/
      DATA A(1665),B(1665)/117485568,294947/
      DATA A(1666),B(1666)/201338880,1663/
      DATA A(1667),B(1667)/234901504,1667/
      DATA A(1668),B(1668)/16818176,1670/
      DATA A(1669),B(1669)/201338880,1667/
      DATA A(1670),B(1670)/234901504,1670/
      DATA A(1671),B(1671)/218144768,1670/
      DATA A(1672),B(1672)/117485568,299043/
      DATA A(1673),B(1673)/201338880,1670/
      DATA A(1674),B(1674)/234901504,1674/
      DATA A(1675),B(1675)/16838656,1713/
      DATA A(1676),B(1676)/201338880,1674/
      DATA A(1677),B(1677)/234901504,1677/
      DATA A(1678),B(1678)/16855040,1716/
      DATA A(1679),B(1679)/201338880,1677/
      DATA A(1680),B(1680)/234901504,1680/
      DATA A(1681),B(1681)/134262784,217123/
      DATA A(1682),B(1682)/201338880,1680/
      DATA A(1683),B(1683)/234901504,1683/
      DATA A(1684),B(1684)/134262784,221219/
      DATA A(1685),B(1685)/201338880,1683/
      DATA A(1686),B(1686)/234901504,1686/
      DATA A(1687),B(1687)/134262784,233507/
      DATA A(1688),B(1688)/201338880,1686/
      DATA A(1689),B(1689)/234901504,1689/
      DATA A(1690),B(1690)/134262784,237603/
      DATA A(1691),B(1691)/201338880,1689/
      DATA A(1692),B(1692)/234901504,1692/
      DATA A(1693),B(1693)/17043456,1719/
      DATA A(1694),B(1694)/201338880,1692/
      DATA A(1695),B(1695)/234901504,1695/
      DATA A(1696),B(1696)/134262784,245795/
      DATA A(1697),B(1697)/201338880,1695/
      DATA A(1698),B(1698)/234901504,1698/
      DATA A(1699),B(1699)/134262784,225315/
      DATA A(1700),B(1700)/201338880,1698/
      DATA A(1701),B(1701)/234901504,1701/
      DATA A(1702),B(1702)/17043456,1722/
      DATA A(1703),B(1703)/201338880,1701/
      DATA A(1704),B(1704)/234901504,1704/
      DATA A(1705),B(1705)/134262784,229411/
      DATA A(1706),B(1706)/201338880,1704/
      DATA A(1707),B(1707)/234901504,1707/
      DATA A(1708),B(1708)/16912384,1725/
      DATA A(1709),B(1709)/201338880,1707/
      DATA A(1710),B(1710)/234901504,1710/
      DATA A(1711),B(1711)/17043456,1728/
      DATA A(1712),B(1712)/201338880,1710/
      DATA A(1713),B(1713)/234901504,1713/
      DATA A(1714),B(1714)/17043456,1731/
      DATA A(1715),B(1715)/201338880,1713/
      DATA A(1716),B(1716)/234901504,1716/
      DATA A(1717),B(1717)/16838656,1734/
      DATA A(1718),B(1718)/201338880,1716/
      DATA A(1719),B(1719)/234901504,1719/
      DATA A(1720),B(1720)/134262784,241699/
      DATA A(1721),B(1721)/201338880,1719/
      DATA A(1722),B(1722)/234901504,1722/
      DATA A(1723),B(1723)/134262784,249891/
      DATA A(1724),B(1724)/201338880,1722/
      DATA A(1725),B(1725)/234901504,1725/
      DATA A(1726),B(1726)/17043456,1737/
      DATA A(1727),B(1727)/201338880,1725/
      DATA A(1728),B(1728)/234901504,1728/
      DATA A(1729),B(1729)/134262784,258083/
      DATA A(1730),B(1730)/201338880,1728/
      DATA A(1731),B(1731)/234901504,1731/
      DATA A(1732),B(1732)/117485568,290851/
      DATA A(1733),B(1733)/201338880,1731/
      DATA A(1734),B(1734)/234901504,1734/
      DATA A(1735),B(1735)/17043456,1740/
      DATA A(1736),B(1736)/201338880,1734/
      DATA A(1737),B(1737)/234901504,1737/
      DATA A(1738),B(1738)/134262784,253987/
      DATA A(1739),B(1739)/201338880,1737/
      DATA A(1740),B(1740)/234901504,1740/
      DATA A(1741),B(1741)/117485568,290851/
      DATA A(1742),B(1742)/201338880,1740/
      DATA A(1743),B(1743)/17059840,1755/
      DATA A(1744),B(1744)/17063936,1556/
      DATA A(1745),B(1745)/33812480,1535/
      DATA A(1746),B(1746)/33816576,1532/
      DATA A(1747),B(1747)/33808384,1528/
      DATA A(1748),B(1748)/17043456,1545/
      DATA A(1749),B(1749)/33824768,1542/
      DATA A(1750),B(1750)/33730560,1538/
      DATA A(1751),B(1751)/100706192,7176227/
      DATA A(1752),B(1752)/100706239,7180323/
      DATA A(1753),B(1753)/50374544,35/
      DATA A(1754),B(1754)/201338880,1743/
      DATA A(1755),B(1755)/234901504,1755/
      DATA A(1756),B(1756)/218386432,1755/
      DATA A(1757),B(1757)/352491495,313058/
      DATA A(1758),B(1758)/17063936,1556/
      DATA A(1759),B(1759)/16965632,1605/
      DATA A(1760),B(1760)/117485568,311331/
      DATA A(1761),B(1761)/201338880,1755/
      DATA A(1762),B(1762)/33722368,1322/
      DATA A(1763),B(1763)/201338880,1762/
      DATA A(1764),B(1764)/16818176,1818/
      DATA A(1765),B(1765)/33824768,1542/
      DATA A(1766),B(1766)/16879616,1814/
      DATA A(1767),B(1767)/16867328,1811/
      DATA A(1768),B(1768)/16846848,1808/
      DATA A(1769),B(1769)/16842752,1805/
      DATA A(1770),B(1770)/16834560,1802/
      DATA A(1771),B(1771)/16838656,1799/
      DATA A(1772),B(1772)/16859136,1796/
      DATA A(1773),B(1773)/17055744,1793/
      DATA A(1774),B(1774)/16887808,1788/
      DATA A(1775),B(1775)/16855040,1783/
      DATA A(1776),B(1776)/16826368,1779/
      DATA A(1777),B(1777)/50480572,35/
      DATA A(1778),B(1778)/201338880,1764/
      DATA A(1779),B(1779)/234901504,1779/
      DATA A(1780),B(1780)/16891904,1835/
      DATA A(1781),B(1781)/17068032,1832/
      DATA A(1782),B(1782)/201338880,1779/
      DATA A(1783),B(1783)/234901504,1783/
      DATA A(1784),B(1784)/16855040,1838/
      DATA A(1785),B(1785)/16850944,1841/
      DATA A(1786),B(1786)/117485568,315427/
      DATA A(1787),B(1787)/201338880,1783/
      DATA A(1788),B(1788)/234901504,1788/
      DATA A(1789),B(1789)/16818176,1850/
      DATA A(1790),B(1790)/16867328,1847/
      DATA A(1791),B(1791)/16863232,1844/
      DATA A(1792),B(1792)/201338880,1788/
      DATA A(1793),B(1793)/234901504,1793/
      DATA A(1794),B(1794)/16818176,1854/
      DATA A(1795),B(1795)/201338880,1793/
      DATA A(1796),B(1796)/234901504,1796/
      DATA A(1797),B(1797)/16818176,1858/
      DATA A(1798),B(1798)/201338880,1796/
      DATA A(1799),B(1799)/234901504,1799/
      DATA A(1800),B(1800)/16818176,1858/
      DATA A(1801),B(1801)/201338880,1799/
      DATA A(1802),B(1802)/234901504,1802/
      DATA A(1803),B(1803)/16818176,1862/
      DATA A(1804),B(1804)/201338880,1802/
      DATA A(1805),B(1805)/234901504,1805/
      DATA A(1806),B(1806)/16818176,1862/
      DATA A(1807),B(1807)/201338880,1805/
      DATA A(1808),B(1808)/234901504,1808/
      DATA A(1809),B(1809)/16818176,1866/
      DATA A(1810),B(1810)/201338880,1808/
      DATA A(1811),B(1811)/234901504,1811/
      DATA A(1812),B(1812)/16818176,1871/
      DATA A(1813),B(1813)/201338880,1811/
      DATA A(1814),B(1814)/234901504,1814/
      DATA A(1815),B(1815)/16818176,1875/
      DATA A(1816),B(1816)/117485568,315427/
      DATA A(1817),B(1817)/201338880,1814/
      DATA A(1818),B(1818)/234901504,1818/
      DATA A(1819),B(1819)/218144768,1818/
      DATA A(1820),B(1820)/16838656,1799/
      DATA A(1821),B(1821)/16859136,1796/
      DATA A(1822),B(1822)/16842752,1805/
      DATA A(1823),B(1823)/16834560,1802/
      DATA A(1824),B(1824)/16850944,1886/
      DATA A(1825),B(1825)/16900096,1883/
      DATA A(1826),B(1826)/16846848,1808/
      DATA A(1827),B(1827)/16867328,1811/
      DATA A(1828),B(1828)/16879616,1814/
      DATA A(1829),B(1829)/167903235,1881/
      DATA A(1830),B(1830)/117587968,288599/
      DATA A(1831),B(1831)/201338880,1818/
      DATA A(1832),B(1832)/234901504,1832/
      DATA A(1833),B(1833)/117485568,315427/
      DATA A(1834),B(1834)/201338880,1832/
      DATA A(1835),B(1835)/234901504,1835/
      DATA A(1836),B(1836)/117485568,315427/
      DATA A(1837),B(1837)/201338880,1835/
      DATA A(1838),B(1838)/234901504,1838/
      DATA A(1839),B(1839)/117485568,315427/
      DATA A(1840),B(1840)/201338880,1838/
      DATA A(1841),B(1841)/234901504,1841/
      DATA A(1842),B(1842)/117485568,315427/
      DATA A(1843),B(1843)/201338880,1841/
      DATA A(1844),B(1844)/234901504,1844/
      DATA A(1845),B(1845)/16818176,1850/
      DATA A(1846),B(1846)/201338880,1844/
      DATA A(1847),B(1847)/234901504,1847/
      DATA A(1848),B(1848)/16818176,1850/
      DATA A(1849),B(1849)/201338880,1847/
      DATA A(1850),B(1850)/234901504,1850/
      DATA A(1851),B(1851)/218144768,1850/
      DATA A(1852),B(1852)/117485568,315427/
      DATA A(1853),B(1853)/201338880,1850/
      DATA A(1854),B(1854)/234901504,1854/
      DATA A(1855),B(1855)/218144768,1854/
      DATA A(1856),B(1856)/16850944,1886/
      DATA A(1857),B(1857)/201338880,1854/
      DATA A(1858),B(1858)/234901504,1858/
      DATA A(1859),B(1859)/218144768,1858/
      DATA A(1860),B(1860)/17043456,1889/
      DATA A(1861),B(1861)/201338880,1858/
      DATA A(1862),B(1862)/234901504,1862/
      DATA A(1863),B(1863)/218144768,1862/
      DATA A(1864),B(1864)/17043456,1892/
      DATA A(1865),B(1865)/201338880,1862/
      DATA A(1866),B(1866)/234901504,1866/
      DATA A(1867),B(1867)/218144768,1866/
      DATA A(1868),B(1868)/17043456,1895/
      DATA A(1869),B(1869)/117485568,315427/
      DATA A(1870),B(1870)/201338880,1866/
      DATA A(1871),B(1871)/234901504,1871/
      DATA A(1872),B(1872)/218144768,1871/
      DATA A(1873),B(1873)/117485568,315427/
      DATA A(1874),B(1874)/201338880,1871/
      DATA A(1875),B(1875)/234901504,1875/
      DATA A(1876),B(1876)/218144768,1875/
      DATA A(1877),B(1877)/117485568,315427/
      DATA A(1878),B(1878)/201338880,1875/
      DATA A(1879),B(1879)/50345404,35/
      DATA A(1880),B(1880)/201338880,1879/
      DATA A(1881),B(1881)/33685504,1898/
      DATA A(1882),B(1882)/201338880,1881/
      DATA A(1883),B(1883)/234901504,1883/
      DATA A(1884),B(1884)/117485568,315427/
      DATA A(1885),B(1885)/201338880,1883/
      DATA A(1886),B(1886)/234901504,1886/
      DATA A(1887),B(1887)/117485568,321388/
      DATA A(1888),B(1888)/201338880,1886/
      DATA A(1889),B(1889)/234901504,1889/
      DATA A(1890),B(1890)/16818176,1906/
      DATA A(1891),B(1891)/201338880,1889/
      DATA A(1892),B(1892)/234901504,1892/
      DATA A(1893),B(1893)/16818176,1911/
      DATA A(1894),B(1894)/201338880,1892/
      DATA A(1895),B(1895)/234901504,1895/
      DATA A(1896),B(1896)/16818176,1915/
      DATA A(1897),B(1897)/201338880,1895/
      DATA A(1898),B(1898)/251953152,14207/
      DATA A(1899),B(1899)/201338880,1898/
      DATA A(1900),B(1900)/16818176,1922/
      DATA A(1901),B(1901)/16842752,1805/
      DATA A(1902),B(1902)/16834560,1802/
      DATA A(1903),B(1903)/16838656,1799/
      DATA A(1904),B(1904)/16859136,1796/
      DATA A(1905),B(1905)/184561664,1900/
      DATA A(1906),B(1906)/234901504,1906/
      DATA A(1907),B(1907)/218144768,1906/
      DATA A(1908),B(1908)/16838656,1929/
      DATA A(1909),B(1909)/117485568,315427/
      DATA A(1910),B(1910)/201338880,1906/
      DATA A(1911),B(1911)/234901504,1911/
      DATA A(1912),B(1912)/218144768,1911/
      DATA A(1913),B(1913)/117485568,315427/
      DATA A(1914),B(1914)/201338880,1911/
      DATA A(1915),B(1915)/234901504,1915/
      DATA A(1916),B(1916)/218144768,1915/
      DATA A(1917),B(1917)/117485568,315427/
      DATA A(1918),B(1918)/201338880,1915/
      DATA A(1919),B(1919)/234901504,1919/
      DATA A(1920),B(1920)/117485568,307235/
      DATA A(1921),B(1921)/201338880,1919/
      DATA A(1922),B(1922)/234901504,1922/
      DATA A(1923),B(1923)/218144768,1922/
      DATA A(1924),B(1924)/16838656,1799/
      DATA A(1925),B(1925)/16859136,1796/
      DATA A(1926),B(1926)/16842752,1805/
      DATA A(1927),B(1927)/16834560,1802/
      DATA A(1928),B(1928)/201338880,1922/
      DATA A(1929),B(1929)/234901504,1929/
      DATA A(1930),B(1930)/16818176,1932/
      DATA A(1931),B(1931)/201338880,1929/
      DATA A(1932),B(1932)/234901504,1932/
      DATA A(1933),B(1933)/218144768,1932/
      DATA A(1934),B(1934)/117485568,315427/
      DATA A(1935),B(1935)/201338880,1932/
      DATA A(1936),B(1936)/16818176,1938/
      DATA A(1937),B(1937)/201338880,1936/
      DATA A(1938),B(1938)/234901504,1938/
      DATA A(1939),B(1939)/218144768,1938/
      DATA A(1940),B(1940)/167903235,1881/
      DATA A(1941),B(1941)/16838656,1945/
      DATA A(1942),B(1942)/16834560,1949/
      DATA A(1943),B(1943)/117485568,288673/
      DATA A(1944),B(1944)/201338880,1938/
      DATA A(1945),B(1945)/234901504,1945/
      DATA A(1946),B(1946)/16818176,1962/
      DATA A(1947),B(1947)/17055744,1959/
      DATA A(1948),B(1948)/201338880,1945/
      DATA A(1949),B(1949)/234901504,1949/
      DATA A(1950),B(1950)/16818176,1969/
      DATA A(1951),B(1951)/17055744,1966/
      DATA A(1952),B(1952)/201338880,1949/
      DATA A(1953),B(1953)/17043456,1973/
      DATA A(1954),B(1954)/33730560,1538/
      DATA A(1955),B(1955)/33812480,1535/
      DATA A(1956),B(1956)/33816576,1532/
      DATA A(1957),B(1957)/33808384,1528/
      DATA A(1958),B(1958)/184561664,1953/
      DATA A(1959),B(1959)/234901504,1959/
      DATA A(1960),B(1960)/16818176,1962/
      DATA A(1961),B(1961)/201338880,1959/
      DATA A(1962),B(1962)/234901504,1962/
      DATA A(1963),B(1963)/218144768,1962/
      DATA A(1964),B(1964)/117485568,294947/
      DATA A(1965),B(1965)/201338880,1962/
      DATA A(1966),B(1966)/234901504,1966/
      DATA A(1967),B(1967)/16818176,1969/
      DATA A(1968),B(1968)/201338880,1966/
      DATA A(1969),B(1969)/234901504,1969/
      DATA A(1970),B(1970)/218144768,1969/
      DATA A(1971),B(1971)/117485568,299043/
      DATA A(1972),B(1972)/201338880,1969/
      DATA A(1973),B(1973)/234901504,1973/
      DATA A(1974),B(1974)/16891904,1601/
      DATA A(1975),B(1975)/16838656,1598/
      DATA A(1976),B(1976)/16871424,1595/
      DATA A(1977),B(1977)/16879616,1592/
      DATA A(1978),B(1978)/16859136,1588/
      DATA A(1979),B(1979)/16867328,1584/
      DATA A(1980),B(1980)/16842752,1581/
      DATA A(1981),B(1981)/16887808,1578/
      DATA A(1982),B(1982)/201338880,1973/
      DATA A(1983),B(1983)/16818176,1985/
      DATA A(1984),B(1984)/201338880,1983/
      DATA A(1985),B(1985)/234901504,1985/
      DATA A(1986),B(1986)/218144768,1985/
      DATA A(1987),B(1987)/17043456,1989/
      DATA A(1988),B(1988)/201338880,1985/
      DATA A(1989),B(1989)/234901504,1989/
      DATA A(1990),B(1990)/16818176,2003/
      DATA A(1991),B(1991)/16834560,1999/
      DATA A(1992),B(1992)/16838656,1995/
      DATA A(1993),B(1993)/117485568,294947/
      DATA A(1994),B(1994)/201338880,1989/
      DATA A(1995),B(1995)/234901504,1995/
      DATA A(1996),B(1996)/16818176,2012/
      DATA A(1997),B(1997)/17055744,2009/
      DATA A(1998),B(1998)/201338880,1995/
      DATA A(1999),B(1999)/234901504,1999/
      DATA A(2000),B(2000)/16818176,2019/
      DATA A(2001),B(2001)/17055744,2016/
      DATA A(2002),B(2002)/201338880,1999/
      DATA A(2003),B(2003)/234901504,2003/
      DATA A(2004),B(2004)/218144768,2003/
      DATA A(2005),B(2005)/16834560,1999/
      DATA A(2006),B(2006)/16838656,1995/
      DATA A(2007),B(2007)/117485568,294947/
      DATA A(2008),B(2008)/201338880,2003/
      DATA A(2009),B(2009)/234901504,2009/
      DATA A(2010),B(2010)/16818176,2012/
      DATA A(2011),B(2011)/201338880,2009/
      DATA A(2012),B(2012)/234901504,2012/
      DATA A(2013),B(2013)/218144768,2012/
      DATA A(2014),B(2014)/117485568,294947/
      DATA A(2015),B(2015)/201338880,2012/
      DATA A(2016),B(2016)/234901504,2016/
      DATA A(2017),B(2017)/16818176,2019/
      DATA A(2018),B(2018)/201338880,2016/
      DATA A(2019),B(2019)/234901504,2019/
      DATA A(2020),B(2020)/218144768,2019/
      DATA A(2021),B(2021)/117485568,299043/
      DATA A(2022),B(2022)/201338880,2019/
      DATA A(2023),B(2023)/16842752,2030/
      DATA A(2024),B(2024)/16838656,2026/
      DATA A(2025),B(2025)/201338880,2023/
      DATA A(2026),B(2026)/234901504,2026/
      DATA A(2027),B(2027)/16863232,2036/
      DATA A(2028),B(2028)/16891904,2033/
      DATA A(2029),B(2029)/201338880,2026/
      DATA A(2030),B(2030)/234901504,2030/
      DATA A(2031),B(2031)/16896000,2039/
      DATA A(2032),B(2032)/201338880,2030/
      DATA A(2033),B(2033)/234901504,2033/
      DATA A(2034),B(2034)/16834560,2042/
      DATA A(2035),B(2035)/201338880,2033/
      DATA A(2036),B(2036)/234901504,2036/
      DATA A(2037),B(2037)/16863232,2045/
      DATA A(2038),B(2038)/201338880,2036/
      DATA A(2039),B(2039)/234901504,2039/
      DATA A(2040),B(2040)/16887808,2048/
      DATA A(2041),B(2041)/201338880,2039/
      DATA A(2042),B(2042)/234901504,2042/
      DATA A(2043),B(2043)/117485568,335907/
      DATA A(2044),B(2044)/201338880,2042/
      DATA A(2045),B(2045)/234901504,2045/
      DATA A(2046),B(2046)/117485568,340003/
      DATA A(2047),B(2047)/201338880,2045/
      DATA A(2048),B(2048)/234901504,2048/
      DATA A(2049),B(2049)/117485568,331811/
      DATA A(2050),B(2050)/201338880,2048/
      END